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Introduction 

This is the reference manual for the Model I (ML) central pro- 
cessor. It is intended to be a complete and self-contained 
description of the characteristics of the processor from the 
point of view of a machine language programmer (although it 
is hoped that few programmers will ever have occasion to des- 
cend to machine language) . Omissions and inconsistencies 
should be drawn to the attention of the authors. 

Three considerations have dominated the design of the Ml . They 
are stated here in the hope that they will ma?<e clearer the ra- 
tionale for some of the machine's characteristics. 
1)' ' The Ml will be implemented' on a somewhat modified' version 
of a BCC microprocessor . This implies that peculiar instruc- 
tion and addressing sequencing can be used' freely. No atten- 
tion .has been .paid to the requirements which might be imposed 
t 
by alternative implementation. 

2) ' The Ml will be programmed almost entirely in SPL. or FORTRAN 
It is therefore essential that the common constructs of these 
languages haVe efficient hardware counterparts. Most notable 
among them are array referencing, function calls and returns, 
part-word field ' accessing and' string processing ;' Furthermore, 
it is pointless to' include features which cannot be' used by the 
compilers we are lively' to write. 

3) 'The -Ml 'must have a ntode in which it is essentially compat- 
ible' with the SDS 940. 
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General Characteristics and State 

The Ml is a 24-bit word-oriented twos complement machine. It 
has 64 instructions and a variety of addressing modes, Sits arc 
numbered to 23 with bit on the left (most significant) end 
of the word. Eoth single (48-bit) and double (96-bit) precis io 
floating point arithmetic is implemented in hardware. 

^ ie state of the machine, by which we mean the information whicl 
must be preserved, together with the contents of memory, to per 
mit execution of a program to be continued without disturbance, 
consists of 12 words of information arranged as follows, to- 
gether with a context block . 



Word 


Pi t s 
0-5 


Name 


Contents 





unused 





6-23 


p 


Program counter 


1 


0-23 


A 


A register 


2 


0-23 


B 


B register 


3 


0-23 


C 


C register 


4 


0-23 


D 


D register. C and D a 



5 


0-11 


E 


6 


0-23 


X 


7 


0-23 


L 


8 


0-23 


G 


Q 


0-23 


SR 


9 


23 


1NSTD 


9 


22 


OV 


9 


21 


TOV 



extension of AB for double-precisior 
floating point arithmetic 

Floating point exponent 

Index register 

Local environment register 

Global environment register 

Status register 

Instruction terminated bit 

Overflow bit 

Temporary overflow bit 



n 



dn*I&b—< -. *_ 



W" 






p/t-tiJ 



M ICPU/M-4 J 



page 
4 



9 14 

9 12-13 

S S-ii PRMOD 

9 6-8 TRMCO 

9 5 FDP 

10 0~23 CTC 

11 0-23 IT 



9 20 CARRY Carry bit 

9 19 PDFlAG Permanent double-precision flag 
9 IS TDFLAG Temporary double-precision flag 
9 17 XMONT Monitor exit trap flag 
9 16 XUTILT Utility exit trap flag 
9 15 SUF Soft Underflow flag 
94 OM 940 mode 
CC Condition code 

Permanent rouriding {node 
Temporary rounding mode 
Full double precision flag 
Compute time clock 
Interval timer 

The context block contains in certain fixed locations the map 
for the currently running process. 

Address Space and Map 

The Ml considers' itself at any particular time to be running a 

process which is defined by a context block, which is a 2040 

word block of memory, in a way which we now proceed to describe 

Each process has a 25GK address space? i.e. the Ml processor 

uses 18-bit addresses to specify memory locations, The 

address space has two significant characteristics! 

1) it is divided into three rings as follows: 

addresses 0-377777B User ring (lowest) 

403000B-5777773 Utility ring 

400000B-402777B and 

600000D-777777B monitor ring (highest) 
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The rings are protected from each other according to certain 
rules. Every memory reference is said to have a source . The 
source for any references generated by an instruction up to 
and including a fetch of an indirect word is. for exaTple, the 
program counter; the source for any reference generated 
after a fetch of an indirect word Up to and including a fetch 
of the next indirect word is the address of the first in- 
direct word. Every reference also has a targ et, which is the 
address being referenced. The following matrix defines those 
combinations of source and targets which are legal. 



User 
User Yes 
Source Utility Yes 
Monitor Yes 



Target 

Utility Monitor 

So No 

Yes No 

Yes Yes 



To summarize: 

a) References from one ring to a higher one are 
forbidden. 

b) If indirection leads to a lower ring, it is for- 
bidden to return to the same or a higher ring during the 
same instruction. This fact makes it easy, for example, 
for monitor routines to enforce the user's protection 
rules when storing into a table provided by the user: 
they need only do their stores indirect through an address 
in the user ring, and the ring protection hardware will do 
the checking automatically. 
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A forbidden reference causes trap MACC, The target is passed 
as a parameter to this trap. 

The reason for putting 400000B-402777B in the monitor ring 
is that the operating system is expected to leave the context 
block in the map at 4B5 and 6B5 so that both monitor and 
utility can use it for storage. The monitor will then have 
words - 2777B of the context block available to it and 
protected from the utility, and the utility will have 
3000B-3 777B. Since the last word of the context block is 
at 4037773 in the utility ring, the utility can extend its 
section of the context block with additional contiguous 
storage . 

t 2) The address space is organized into 2048 (2X) word 
pages, and the precise collection of pages which make up 
the address space is specified by the map. Pages are named 
in a manner independent of their location in core, and the 
mapping hardware uses this location - independent name, 
together with a table called the core hash table (CUT), to 
determine the physical core location of a page. The page 
number (the top 7 bits) of every memory reference thus 
requires two levels of translation: 

from page number to location - independent name 

from location - independent name to physical page address 

The various mechanisms for performing this translation will 
new be described. 
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Locations 2Q0B-2778 in the context block contain the map. 

These 128 half-words specify the contents of the corresponding 

128 pages of the address space of the process? the high order 

half-words corresponding to even indices, Each half-word is 

interpreted as follows: 

git ffame Contents 

MAPRO Bead-only bit. This bit is merged 

with the RO bit in PMT to make the 
read-only bit interpreted by the 
hardware 

1_3 unused 

4-11 PMT I a PMT index 
The private memory table {PMT} provides enough information 
about each page accessible to the process to permit the hard- 
ware and the memory management to access the page. The PMT 
starts at location 300B in the context block. Each entry is 
4 wordn long; the address in the context block of PMT entry i 
is therefore 4(i-l) -t 300B. 

A PMT entry has the form 

Contents 



Word 


Bits 


Name 





0-23 


UNI 


1 


0-23 


UN2 


2 


2-73 


DA 


3 





PMTRO 


3 


1 


PRF.F 


3 


12 


SF 



First 24 bits of unique name for 
the page 

.Second 24 bits of unique name for 
the page 

Disk addrcrs of the page 

Read-only bit 

Page has been referenced 



Page is scheduled for the process 
(i.e., in core Working set and 
the process is active) 

The other bits are not used by hardware 
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Note that there is no provision far execute-only pages, 
since this device by itself is not sufficient to protect 
propreitary programs. The sub-process structure of the 
monitor is supposed to be used for this purpose. 

The central processor contains a physical map (?M) which 
has 128 registers of 11 bits each. One of the registers 
has the form 



Bits 



2 

3-10 



EF 
DB 

PMRO 

PA 



Contents 



Empty flag 

Dirty bit, set if the page has 
been stored into since it was 
read from the drum 

Read-only bit 

Physical address of page in 
a real core of up to 512K. 



When a new process starts to run on the processor, the 
cnipty flag is set in each PM entry. Every address gener- 
ated by the program must be mapped to convert it from virtual 
to real so that an access can be made to the real core. 
This is done by taking the top 7 bits of the 18-bit address 
and using them to select one of the 128 PM entries. 
If the empty flag is off, the remainder of the entry is 
returned. The PA field is prefixed to the last 11 bits of 
the virtual address to make a real address. If the access 
is a store and PMR0=1, the store is aborted and the PRO 
trap is caused. If the access is a store, PMRO=0 and 
Uli 0, the dirty bit in the CUT entry for the p;ige is set 
and DB is set to 1. 
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If the empty flag is on, the PM entry must be loaded. 
1 Let its index be i. First, entry i of the map (i.e. 

half-word 200B<-i in the context block) is fetched. If FMTI 
is 0, trap PNTM occurs. If it is not } MAPRO {i] is 
saved. Then the PKT entry specified by PMTI {i] is fetched. 
Call it entry n. If SF[n] = 0, trap PNIC occurs. PMTRO is 
saved; if PREF {nj - 0. it is set to 1; the UN found in PKT 
[nj is then looked up in the core hash table. 

The core hash table contains a six-word entry for each 
page of real core. It starts at location 4003 in real 
core and is organized as a chained hash table. Each entry 
has the form 

Word Bits Name Contents 






0-23 


UNI 


I 


0-23 


UN2 


2 

a 


2-23 


DA 


3- 





DIRT 1 


3- 


1 


U 


3' 


2-4 


PST 


3' 


5-12 


CPA 



16-23 



First 24 bits of unique name 

Second 24 bits of unique name 

Disk address of page 

DIRTY Dirty bit 

Unavailable bit 

Page status 

Core page address . This is also 
implied by the index of the en- 
try in CHT 

SCKL'D Number of occurrences of page 
in loaded working sets 



4 


6-23 


FCLP 


Free core list pointer 


5 


0-5 


PL 


Page lock 


5 


6-23 


CLP 


Collision PTR 
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A pag<' if found by hashing the UN an described in M'ilA/l. 
if Mifi p.itr'H found, <*|»A'.in<l InUTY .if Cop I • ^ Into the TM 

ufid pMf.n H hh »-o iwMUpMTwr (nj. ' Tf' (iron pnt)- / bf 

th«- p.Kjr."«S-i not In CUT, trap PNIC Occurs. 

All the tropr: {PP.O, I'M IK, PNIC) which can be generated by I he 
m.tppinq operation arc given th<> virtual address being mapped 
aa a parameter . 

To make sure that a particular page is not being used by the 
CPU, an external processor may request a sca n of the physical 
pap. When puch a request is received, the . PA field of all 
non-empty registers in the physical map is matched against 
the contents of cell 2455B -f CPU number *4. If any of them 
matches the MAB trap occurs. The message cell is set to 4D7 
upon completion of the scan, regardless of the outcome. 

Addressing from Instructions 



The machine has a rather complex addressing structure. The 
addres s ca lculation is performed in the same way for every 
instruction, and it may yield either an o perand OP or an 
effective a ddre ss Q or both. To specify this calculation 
it is necessary to define the format of an instruction and 
of an indirect address word (IAV7) . For an instruction 



Bit 



Name 


940 Mode 


S 


Sycpop bit 


X 


Index bit 


p 


pop bit 


OPC 


Opcode 


I 


Indirect bit 


w 


Address field 



1 

2 

3-8 

9 

10-23 

An I AW format depends on the mode. 1ft 940 mode it is 
exactly like an instruction, except that S; P, and OPC 
have no significance and are ignored.' Otherwise it looks 
like this; 



' Normal Mode 
Part of TAG 
Part of TAG 
Part of TAG 
Opcode 
Pop bit 
Address field 
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Since tbu addressing is rather complex, it seems worthwhile 
to explain in some, detail what the various features are for, 
before describing them preciuely. There are a number of 
points which influenced the design: 

1) It is necessary to be able to conveniently address 
a 256K (IS-bit) address space, even though an instruction 
has only a 14-bit address field. 

2) Programs are normally written in relatively small 
units, each of which references some private storage of its 
own and some global storage. 

3) Array references. are very common, Since there is 
only one index register for holding subscripts, it would be 
very nice to have a convenient way of using core locations 
for indexing, Since the languages which are expected to ?c- 
count for a majority of the load on the machine require 
subscripts to be checked for size before being used, it would 
be nice to have a cheap and convenient way of doing this. 
Furthermore, we have to deal with arrays having elements 
which may occupy 1 (integer), 2 (real) or 4 (double) words. 
To have to multiply the index by the element size is a great 
annoyance . 

4) References to fields which occupy whole words or parts 
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of wordy relative to a pointer are also common, especially 
in system code, 

5) It is essential to have an efficient mechanism for 
handling strings of 8-bit characters. If other byte sizes 
can also be accommodated, so much the better, 

6) We want to leave most of the 930 addressing capa- 
bility in, ao that it will be easy to convert 930 programs 
to run in normal mode. 

All of these goals are achieved in a fairly economical way 
by the addressing system of the Model I. In particular, 
arrays, strings, and part-word fields are handled by in- 
direct addressing, which allows an absolute 18-bit address 
tc be supplied. The addressing modes available in an in- 
struction allow Ear immediate operands, addressing relative 
to the instruction word for referencing the program, and 
addressing relative to two base registers which are in- 
tended to reference the local storage of the subroutine 
(called the local environment, L) and the global storage 
of the whole program (called the global environment, G) . 
They also permit indexing to be specified from the X register 
or from the first few cells of the local or global enviro- 
nment . 

It should be obvious by now that the addressing system is 
designed to be used by programs which are organized in a 
very definite way, i.e. into a collection of subroutines 
or functions (of less than 4K words each), each with local 
storage (of less than 2K words for scalars), and all with 
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access to a single globa" storage and communications area 
{of less than 16K words) . The first 128 words of the local 
and global environments are -specialf this is because there 
are 8-bit fields in certain addresses in which the top bit 
specifies L or <S and the remaining 7 bits address one of the 
first 128 words. The first 32 words are even more special, 
because there are 6-bit fields which address these words. 

With this introduction, we proceed to describe the addressing 
in detail, together with comments on the intended use of 
each feature. A reader unfamiliar with this material will 
find it helpful to read the text following the description 
of each mode first. 

The 3-bit TAG field of an instruction determines one of 8 
addressing modes . 



are 


TAG 


NAME 




ADDRESSING MODE ' 


i 


Gf 


D 




Direct 




1 


I 




Indirect 




2 


X 




Indexed 




3 


BX 




Base- index 




4 


PD 




Pointer-displacement 




5 


IPD 




Indirect-pointer- 
displacement 




6 


EXD 




Base- index-displacement 




7 


REL 




Relative. This one has 6 
sub-cases 






IK, 


IMX 


Immediate, ordinary and 
indexed 






LR, 


ILR 


L-relative, direct and 
indirect 



' ) 
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SR, iSR 



Source-relative, direct 

and indirect 



Most of the modes depend on the existence of an indexing 
register IR, and a source register R. The IR register is 
not to be confused with the index register X. In fact, it 
,is not .part of the state at all-; i.e. its value does not 
have to be preserved from one instruction to the 'next. The 
IR ir, used to hold the 18-bit value which will be used when 
an indexing operation is called for by the addressing "system. 
Tt is initialized from X at the beginning of each instruction. 
Thereafter, it may be loaded from a word specified by a 
BX or BXD mode or an array indirect word (see below) . 
J The source register is initialized to the address of the word 
f from where the instruction has been fetched (normally P) . 

Some addressing modes (the ones which do not have indirect 
in the name or I in the abbreviation) compute Q directly 
from the information in the central registers, the instruc- 
tion and possibly one memory word used for indexing. Others 
(the indirect nodes! compute directly the location of an 
i ndirect add ress word , and the contents of this word then 
determines how the addressing computation is to proceed. If 
indirect addressing is specified, only the values of the 
I AW address and IR affect the subsequent address computation. 
We will therefore confine ourselves to specifying these valuer. 
which describe instruction addressing, and leave the details 
of indirect addressing for later treatment. 
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CONTENTS (N> will be used to, denote the contents of 
the memory location with address K. Ring checking is per- 
formed with R as a source and N as target. 

Direct (D) ? Q «- W + G; OP <- CONTENTS (Q) ; Note: W is 
the address field (bits 10 - 23) qf the instruction. 
In direct mode, the effective address is given by the 14-bit 
address field relative to G. This permits direct addressing 
of the first 16K of the global environment. The notation is 
LDA G' [W] 

Indirect (I) : IA(W ■«- G) ; 

In indirect mode, any of the first 16X words of the global 

environment can be used as an IAW. The statement IA (X) 

implied that 'the indirect addressing sequence is initialed: 

FUNCTION 'IA(XV; 

IAW <-' CONTENTS (XV ; R +- X; 
i 
* PROCEED TO PROCESS IAW 

'By 'the 'time it is finished, it will set the value of 0. or OP. 
The notation is LDA $ G ' [W] 

Indexed ' (X) : "q *- W '•+■ ' IR: OP <- CONTENTS (Q> 
Since IR is initialized to X, the effective address is the 
(18-bitt sum of the index register and the address field. 
There are two ways to look at this addressing mode: 

1 - X contains a pointer and W is a displacement relative 
to this pointer 
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2 - W is an address (in the first 16K) and X is a dis- 
placement. This interpretation is unsatisfactory for 
programs which exceed 16K in size, and is not expected 
to be much used , 



The way to code the 930 's 

BRU *, 2 

so that it will work anywhere in the address space is with 
indirection (see below) through a normal IAW with source- 
relative indexed addressing. 
The notation is LDA X* [W] 

These are three of the four addressing mode3 available 
on the 933. The fourth, indexing and indirection, is not 
available in normal mode on the Ml, since it was judged 
less useful than any of the 5 new modes; it can be obtained 
wlt>i 1PD mode (see below) if the offset relative to X lies 
between -4CB and 37B. 

Pointer-displacement (PD) : T <- W [15. 23]; 

U <- IR IF T=0 ELSE CONTENTS ( 
G + T IF T^OOB ELSE 
L 4. T - 200B} ; 

T «- W [10, 15]; 

V <- (T IF T<4QB ELSE T - 100BY 

Q <- U + V; 

OP ■«- CONTENTS (Q) ', 

First there is some nev; notation here. W [10, 15] means bits 
10 to 15 of W (the address field of the instruction) con- 
sidered as a 24-bit number (with 18 zeros on the left, in 
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this case) r 

In this mode the address field is divided into an 8-bit 
pointer address (PA) and a 6-bit signed displacement. 
Similar arrangements are used in several other modes; they 
will be explained here in detail. The top bit of the 8-bit 
pointer address specifies the environment (l=local, 0- 
global) and the remaining 7 bits address one of the first 128 
words in the local or global environments. If PA is &, the 
contents of IR, rather than of word cf in G, is specified. 
It is this decoding which is specified by the argument of 
CONTENTS. The calculation of V specified the conversion Of 
a 6-blt number which is to be interpreted as twos -complement 
into a 24-bit twos-complement number. 

Finally, the effective address is the sum of the pointer 
specified by PA and the displacement. The typical use of 
this mode is in addressing the nth word of a table entry 
given a pointer to the start of the entry. If the pointer 
P is in the first 128 words of either environment, then the 
word is loaded into A, say, by 

LDA P(n] 
which is the notation for PD addressing with pointer ad- 
dress P and displacement n. 

Another way to use this mode is to reference non-local 
variables in a block-structure language. Assuming that 
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each block requires no more than 64 words for its storage, 
we proceed as follows. When a new block is entered, set 
up in its local environment a pointer to word 32 of the 
storage area for the latest incarnation of each lexico- 
graphically enclosing block.' Then)' if X occupies word 4 
in block F, whose storage is pointed to by local environ- 
ment word 12, we reference X with 

LDR, L' [12] [44B] 
The displacement of 44 B is -28 from the pointer, which' 
eddresnes word 32 of the storage for F. So the word of F*s 
storage actually addressed is 32-28=4, as required. If a 
block has more than 64 words of scalars, it can be assigned 
several pointer words in the local environment. 

Indirect-pointer-displacemont (IPD) : 

U and V are computed as for PD mode 

IA (U 4 V) ; 

This is just indirect addressing in PD mode. All of the 

direct addressing modes have indirect counterparts, for 

obvious reasons. 

Notation is LDA $P [n] 

Base -index (3X) : T+-W [16, 23 J; 

V«-IR IF T=0 ELSE 

G + T IF T<200B ELSE 
L + T - 200B; 

T«W [10, 15]? 

IR<-IR IF Tr0 ELSE CONTESTS ( 
G + T IF T<40B ELSE 
L + T - 40B) ; 

IA(V); 
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This is the array accessing mode and is written- 

LCA B [T]' , „' Cy 

where B is the base and I the index. The 8-bit / and 5-bit 
index are both treated as local" or global environment 
addresses, exactly like the pointer address in PD mode. 
The index is put into IR and the base specifies an indirect 
word., If an array is being accessed, B will address an 
IAW which has the 18-bit base address of the array and 
specifies indexing. The contents of IR, which wa? loaded 
from r, will' thus be added to the base address of the 
array to determine the final 18-bit address, which is just 
what we require for array referencing. This is not,, however. 
the whole story?- the rest will' be told when we cone to con- 
sider the indirect addressing type used for arrays. 

Base-index -displacement (BXD) ; 

1 T *■ W[ 16,23] ; 

U' <- $ IF ?-0 ELSE CONTENTS (' 
Q -r T IF T<2faB ELSE 
L ,+ T - 200U) ; 

T <- wClOf.15] : 

V <- {T IF T<4tfB ELSE T - 1C0B) 

T *■ IR; 

IR <- U + V; 

IA (T) ; 

This mode is similar to 3X. It assumes that the base is in 
the IR. The field thus freed is used to provide a displace- 
ment (anything from -32 to +31) of the index. Thus to load 
B [I -f 5) wc would write 

EAX B 

LDA ($X') fl + 5] ? 
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here I is the index, 5 the displacement. See the discussion 
of arrays below for more details , 

Relative (REE) : there are G sub-o-:scs, depending on the 
first three bits of W. 
Thus: 



Name 



L-ra lative (LR) 

Indirect L-relative (ILR) 

Sou rce-rela t ive (SR) 



Ir d i r e ct_sou rce-relgtive 
" JJM3L 



Immcd late T indexed (IMX) 
Immediate (IM) 



_wMi_ilL 



2, 3 



4, 5 



description 



U *- W [13, 23]; 

Q •«- L -<- UJ 

OP <- CONTENTS (Q) ; 

Compute U as above, 
then: 

IA (L + U); 

T «- V7 [12, 23]; 
V <- (T IF T<4000B 

ELSE T - 10000B) J 
Q *- R -»- V; 
OP *- CONTENTS (0) ', 



Compute V as above, 

then: 

IA (R + V) 
Compute U as IM, then: 

OP <- U 4 IR; 

T <- w [13, 23] r 

U <- (T IF T<2000B 

ELSE T - 4000B) ; 
OP < U; 

Note that Q is not 

defined by the LM or 
IMX addressing modes. 
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The immediate mode permits signed constants in the range 
-200GB to 1777B to be provided as operands without an addi- 
tional memory reference. For instructions which store or | 
which expect art operand longer than 24 bits this mode is 
a mistake. The action taken if it is used erroneously is 
a TI trap. The notation is LDA I 

The L-relativc mode permits locations in the range to 
3777B relative to the local environment to be addressed. 
It comes in two flavors to permit direct or indirect ad- 
dressing. The address computation is similar to that for 
source-relative addressing, except that the sign bit of 
the displacement is taken to be ^. 

This mode allows 2043 words of local environment to be 

addressed directly. This should be more than enough for 

all- the scalar storage of a routine. It will not, of course, 

i 
be enough for the arrays, but they are all expected to be 

addressed by indirection, so there is no problem. 

Notation is LDA L* [D] or 

LDA $L' [D] for indirect 

Finally, the source-relative (or R-relative) mode permits 
locations up to 40003 on either side of the instruction or 
indirect word to be addressed. This allows routines to be 
placed anywhere in memory without modification and to address 
themselves without difficulty, as long as they arc not more 



r> 



A 

w 



D 



r\-^ 



wv 



p/t-n.r 



MicfcO/M-4 ; 3 



page 
22 



than 2048 words long. The intended programming style is 
small functions connected to each other only by function 
cails, returns and error returns; all of which are taken 
care of by the ELL instruction described below. This 
limitation should therefore not prove to be a problem. 
Notation is LDA R' [D] or 

LDA $R' [D] for indirect 

It was recognized that addressing relative to the start of 
the routine, rather than relative to the source R, 
would be bettor in some instances; this mode was not 
provided because it would have requited another word in 
the state to record the start of the program, together 
with machinery for keeping it updated. 

Indire ct Address ing; 

To prevent infinite loop3 of the indirect mechanism, a trap 
II.IM will occur if indirection through more than 16 levels is 
attempted. 

There are four ty pes of indirect addressing: normal, field^ 
string, and array. The type is selected by the first two 
bits of the word. The intended use of each type is sug- 
gested by its name and will now be explained in detail. 
Normal t the IAW has the form 

BITS NAME CONTENTS 

0-1 TYPE 




c 



5 


TRAP 


6 


RELX 


7-23 


LWR 


6-23 


LW 


io-23 


W 



interpreted exactly like an instruc- 
tion TAG 

causes trap IATRP is set 

causes indexing for the relative 
modes 

long address for the relative modes 

long word address 

word address 



if TRAP is set; the IATRP trap is caused, and R is passed 
as its argument; Otherwise, TAG arid w are interpreted 
as in an instruction word, with three exceptions: 

1) if TAG = D, I, or X, LW is used in place of to, and 
G is not added* In other words, an 18-bit absolute 
address is supplied. 

2) if TAG = REL, IR is added to the addresses computed 
by L and R- relative modes if RELX is set. I.e., 

i indexing is possible with these nodes. Also, the 
3-bit subtag is found in bits 7-9, thus allowing the 
CR, ILR, SR, and ISR offsets to be 3 bits longer. 

3) if TAG = PD or IPD, the mode is read-only direct 
(ROD) or read-only X -relative (ROX) respectively. 

These behave exactly like D and X modes except that 
an attempt to store will cause the ROIA trap with 
R as parameter. 

Normal type permits any word in the address space to be 
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addressed directly. It is generally used for pointers and 
for the addresses of arrays. Note that although the capa- 
bilities are almost identical to those provided by an in- 
struction address, the format is quite different. It is 
not possible to use an instruction as an indirect word. 
It also permits indexing of a L-relative or source-relative 
address, so that arrays in the program or the local en- 
vironment can be addressed conveniently. 

Field: the IAW has the form 



size of field in bits 

address of first bit of the field 

causes sign extension of the field if 

set 

13-23 DISP 2's complement signed displacement 



FIELD: Q '+- IR + DISPL; 

U «- CONTENTS (Q) ; 

OP < U [FB, FB •*- SIZE - 1}; 

OP < OP - 2f (24-FB) IF SE = 1 AND OP {FD, FB]=lr 



The field which is SIZE bits in length and which starts 
at bit FB in word DISP -* IR is referenced. Both FB and 
FB ■< SIZE - I must be £23. If they are not a TI trap will 
occur. If SE is set, the leftmost bit of the field (bit 
FB at DISP ~ 2R) will be extended into bits through 
22-SIZE of the resulting operand. DISP is ta*;cn as a 
2's complement number,' in the range -1024 to 1023. 



0-1 


TYPE 


3-7 


SIZE 


8-12 


FB 


2 


SE 
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The idea here is that IR contains a pointer to a table 
entry, and that the field descriptor (the IAW) specifics 
a group of bits at some definite location in the entry. 
Typically, the pointer might be in PTR within 32 words 
of L and the field descriptor in F within 128 words of 
G. Suppose the contents of F is 



FIELD 
or in octal DATA 
then we might write 

LDA 



3: 6, 12 

23450003B 

F [PTR] 



using base-index addressing. Since PTR appears in the 
index field, its contents is put into IR. Then F is 
taken as an IM?< Since it is of type field, it accesses 
the word at IR + 3, which is CONTENTS (PTR^-3) f i.e., the 
fourth word of the object pointed to by PTR. Bits 6-12 
of this object will be loaded into A. If the word addressed 
was 01234567B, then A will contain 47B. The field can be 
used as an operand in any instruction which accesses a 
single-word operand, regardless or whether it is a load or 
store. Note that fields cannot cross word boundaries. 

Str ing: the IAW has the form 

0-1 TYPE 2 

2-3 



CSIZE character size: 0=6 bits,. 1=8, 2-12, 
3=24 



4-5 CPOS character position in word 
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6-23 



WA 



word address 



The character at the indicated position in the word addressed 
"by M\ is referenced. The following table defines what bits 
are referenced by the 16 possible combination of CSIZfi and 

cpgs . 



cs 


IZF./CT 



OS 


0- 


JL. 

•5 




L 


2 

12- 


17 


3 




6- 


-11 


18-23 




1 




0- 


■7 


8- 


-15 


16- 


23 


X 




2 




0- 


-11 


12- 


-23 


X 




X 




3 




0~ 


23 


X 




X 




X 



Combinations marked X in the table will cause a TI trap, 

The bits referenced are treated exactly like the bits 
selected by a field IAW. 

This type of indirection allows one byte in a string to 
be referenced. The instruction ISD increments the des- 
criptor to point to the next byte, which may then be 
referenced. It has the additional feature of setting 
the condition code depending on whether the descriptor 
is equal to the next word or not. The string type and 
this instruction are intended to be used with four-word 
string descriptors. The first word points just before 
the first byte allocated for the string. The second 
word (read pointer, RP) points to the first character 
of the string, the third' word (write pointer,. WP) to 
the last character. The fourth word points to the last 
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byte allocated for the string. To read the first char- 
acter, increment HP with ISti, then indirect through it. 
The case of no characters left can be detected by the 
abnormal CC setting. To write a character^ increment 
WP with ISd and then store indirect through it. Over- 
flow of available storage can be detected by the CC 
setting . 

Array: an array descriptor is two words long. Its 
form Is: 
0:0-1 TYPE 3 

0:2 LB lower bound for IR (0 or 1) 

0(3 ATRAP array trap bit 

4 LEB large element bit 

5-6 MULT IP LEB = multiplier for IR 

5-10 MULT IF LEB = 1 

7-23 UB IF LEB = 

11-23 UB IF LEB = 1 



upper bound for IR 



If IR^LB or IR)UB, trap ABE occurs, with R as parameter. 
If ATRAP-1 in IAW and the instruction is not LAX. or 
ATRAP=0 and the instruction is LAX, trap IATRP occurs with 
R as parameter. 

otherwise, IR <- (IR - LB) * (MULT + l)r T <- R + 1; 
N0RMAL1A (T) r 

This is the most complicated of the IAW types. It is in- 
tended to accomplish the following functions .connected 
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with array accessing: 

1} Allow or i as lender bound 

2) Perform a bounds check oh the subscript 

3) Multiply the subscript by the size of the array 
element, allowing for sizes up to 63: 

4) Chock 'that the number of subscripts supplied in 
th'" 1 rU'H'bfr expected {<~^c hr-iowj 

5) Provide art i8-bit absolute base address for the 
array. 

Arrays are intended to be stored with marginal indexing. 
Thus, the 2x3 Fortran integer array A would appear as 
foll-ows: 

A = 



r3irr:?T ?__~n . 



3 111 



3! 11 



h~» 



A 

A 


(1 


1) 


2) 


A 
A 


(2 


3) 


1) 


A (2,2) 


A 


Al 


l.U J 
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(The three 2-word descriptors are array indirect words) 
The LAX instruction works just like EAX, except that it 
merges an I tag into XR[2,4] (leaving a normal IAW which 
specifies indirection) and treats the TRAP bit in an array 
descriptor as though it were complemented . 

Ihen to do B «- A[K, L] we would write 

LAX A IK] (3X addressing) 

which leaves the address of the descriptor for the Kth 
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(BXD addressing) 



row in X followed by 

IDA t?X')[L3 

STA B 
The second subscript can have a constat displacement with- 
out complicating things: 

B +- A[K,L-4] becomes 

LDA ^X')iL-4] 
STA B 

If the first subscript has a displacement, there is a compli- 
cation, since there is not enough room for three operands in 
one instruction. 

B *- A[K-*1, L] becomes 

EAX A 

LAX ($X')[KU] 

i 
LDA ($X')[L] 

STA B 

A singly subscripted array can be accessed without any 
extra instructions at all provided the subscript is a 
variable which can be accessed with an I field. If M 
is a 10-element integer array, it is allocated thus: 
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M 


(1) 


M 

"m" 

M 


<2> 


(M ... ..- . 

ML 

» 

16) 


(?) 


M 


(8) 


(9) 


(10) 



and N -*- M[J] becomes 
LDA M[JJ 
3TA N 

If the array is integer (1 word items) and bounds checking 
is not required, 'the descriptors can be changed 'to normal 
indirect words which specify indexing, and no change is 
required in the instructions of the program. 

The purpose of the peculiar behavior of LAX in the case of 
traps is' to- check' that' the proper number 6f subscripts is 
provided' to an 'array. The' trap' bit should be set in' the 
array descriptors except at the last level (the des- 
criptors which point directly to the data) and clear 
there . 
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Use of Addresses by Instructions 

AU innrructjens compute an effective address Q and/or an 
bpornmi OP aa deseed above, the U-.e of those qU.-inllHr*. 
once they have been computed, and in particular the error 
conditions which nay arise, depend on the address type of the 
instruction. There are four address types: 

1) Fetch type (F) 

these instructions will accept any kind of address. They 
'make use only of the 24-bit O? value. 

2) B i f e ct ive - addre ss_ type (E) 

These instructions make use only of the effective address 0, 
ignoring 'OP. Immediate addressing causes a TI 'trap 'if used 
with these instructions. Q is ring-checked with R as 'a source 
before use; if the check fails a ' trap MACC will occur. 

3) ' Store type (S) 

These 'instructions make use' of 'the effective address Q and 

i 
the operand OP. If the address calculation' terminated with 

indirection through a field or string descriptor, the FB and 
SIZE (for a field) or CPOS and CSIZE (for a string) define 
■a group of bits, say bits ; i to j. An"S type instruction puts 
bits'23-j + i to 23 of the word' to be' stored into bits i to j 
of the word addressed by Q, leaving' the rest of this word 
untouched. Immediate addressing causes a TI trap and 
indirection through a read-only direct or read-only indexed 
word causes a RO trap. 

4 ) Double- st ore type (D) 
These instructions make use only of the effective address Q. 



n 



n 



Mfci»MMar-T ^-^ rtriTM1TrinfTHii|-|i ll 



•' ( 




R't-n.r 


r' ! t(<' 


' HfCI'U/A; 4 , ] | 


!/ 


..<■(-•-' .—► -.- . > ( 


* . 



i^.' n th.u , f vy ,r, „<,t .rr t . rl ,„ , by /,„,,, o ;' 1(lTl „ !I ' Jni , invii 



on. 



Legal combinations of in.ntruqUon. and addron.es 
in the /o^lowing ,tab,lc: 



arc summer, ii'od: 



Immediate 
Indirection .through 



■F 
ok 



■E 
TI 



S 

TI 



rough , ROD or ,RQX fQ k ok , R0 



Anything else 



ok t ok 



ok 



-TI 
RO 
ok 



Instructions of types S .or D wifll 



give a PRO trap if q ( or 



Q->i for instructions which reference double (i~L) or 
.quadruple (i»l, 2 ,30 -words) addresses a read-only page . 
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A rather elaborate mechanism for calling functions aru] rctnsn- 
iqg from them is provided in the hardware of the machine. 
Tho purpose is to include all tho capabilities required by 
the FORTRAN and SPL languages directly in the hardware, so 
as to make software interpretation unnecessary. This is 
considered extremely important, since programs are expected 
to be written in snail modules, and functions calls and 
returns are consequently expected to be very frequent. 

The basic features of the call instruction DLL are as follows: 

1) The old P-counter and local environment are saved and 
new ones picked up. 

2) The new local environment may occupy a fixed area, or 
it may bo allocated space at the end of a stack defined by 
two locations in the global environment. There is a check 
for stack overflow. 

3) The caller provides a list of parameter addresses. 
The called function specifies for each parameter whether he 
wants the address, the value or both copied into his local 
environment. If he requests copying of the value, he spec- 
ifies whether it is 1, 2 or 4 words. 

4) He also specifies whether or not a parameter is an 
array. The calling program tells whether it is passing a 
scalar variable, a scalar value (stores are not legal), 

an array or an array element (subscripted array) . These 
distinctions permit all the cheeking for proper matches of 
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arrays with scalars required by FORTRAN to be done automatic- 
ally. The case of an actual parameter which is an array 
e Lenient corresponding to a formal parameter which is an array 
requires sofiwarfi handling and is trapped so that this may 
be accomplished. 

5} The calling program may pass labels which are relative 
to the start of itself. The call automatically supplies the 
current value of this local environment to convert them into 
return descriptors, and records in each local environment the 
start of the program so that the relative address can be 
converted to absolute when they are used. 

6) Provision is made for an argument to be passed in the 
central registers. 

A ^number of these points are somewhat subtle and cannot bo 
properly understood Unless- explained in complete detail, 
which we now proceed to do. 

The BLL instruction addresses a branch descriptor, which is 
a two-word object with the following form: 

J Meaning 



Word 


Bit 
0-23 


Naire 





NEWPt 





A 


SREL 





5 


TRAP 





9-23 


SRW 





6-23 


LW 


1 





CLL 



STK 



This word looks like a weak I AW. 
Its effective address is computed. 

c.f. REL +SR in Normal 1AW 

Causes TRP if set 

Signed displacement if SREL is set 

Long word addresses 

Call bit. The old P and L are savec 
if the bit is set. 

The local environment is allocated 
from the stack if this bit is set. 
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t 

1 


2 




CPA 


1 


3 




CPR IF 
CLL=1 


1 


3 




UWSTK IF 

CLL^J? 


1 


5 




FTN 


t 

1 


6- 


-23 


E 



Arguments are copied if this bit 
is .set . 

The CPA bit in the return descriptor 
is turned on if this bit is set. 

Unwind stack on return. 



1 FORTRAN type function 

This number determines the new L; 
precisely how it does so depends 
on STK and REL. 



Wheri the DLL is executed, the first step is to compute the 
effective address of KEWPW (which is LW if SREL is 0\ Other- 
wise the sign-extended SRW + the address of the Sta'TPV?) . This 
18-bit number is saved in a temporary register called NEWPj 
after undergoing further processing it will become the new 
P-counter . The following steps remain to be performed; 

1) Obtain hew local environment * 

i 
2} Copy arguments. 

3) Compute return descriptor (for CALL) and save it 
in first two words of new local environment. 

4) Transfer control. 

We treat them in the order written, which is also the order 
in which they are performed.. In describing what happens, 
we shall make use of a number of temporary registers or 
Variables (such as NEW, which was introduced above). 
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1} If STK--0,, the E field p£ the descriptor is taken 
as the new value of I,, which wo call NE'aTL. In this case, the 
function being called is said to have a fixed local environ- 
ment. Such a function cannot be recursive, and space must 

be allocated for its local environment at all times. On 
the other hand, the contents of such a fixed environment is 
normally preserved between function cal3s. A FORTRAN 
function has a fixed environment, for example. Since, a call 
fCLl-1) saves the current L in the E field of the return 
; descriptor, the return (CLL-0) handles E exactly as the call 
of a fixed function does. 

If STK=1, space for the environment is allocated on a stack. 
Two words are required to describe the stack, which grovs 
toward increasing- memory addresses: 

SP,- the address of the first unused word, kept in 

G'[2],the third word of the global' environment . 
SL, ' the address of the last word allocated for the 
stack, kept in G'[3] . 

If the environment is stacked, different actions are required 
for calls and returns. 

On a call (CLL=1), we compute SP->E. If it, is>SL, the 

STKOV trap occurs. ' Otherwise, NEWL«-SP and SP<-SP-(E. 

In other words, E locations arc taken from tho top of the 
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stack. The situation before and after is eh own in figure 1. 

On a return (cLL-0) what ordinarily happens if STK is set is 

SP<L; NE'Al^Er 
in other words, tho old L at the time of the call (which was 
saved in the E field of the return descriptor, as we will 
see) becomes the new L, and SP is reset to the value it had 
before the call, which is the current L. The before and 
after pictures of figure 1, looked at in the opposite order, 
should help to clarify this. With these rules, calls can 
be made freely from fixed environment functions to stacked 
environment ones and vice- versa. The industrious reader 
may check the four cases. 

Unfortunately, if tho return is to a function which is not 
the one which called the current one, SP is not reset cor- 
rectly. sThis is expected to happen only as the result 
of a branch to a label which has been passed as a parameter 
(i.e. an error return). 'When such a parameter is passed 
(see be]ow) from function Fl with L=L1 to F2 with L-L2, 
and the descriptor for the call has STK set, the parameter 
appears in F2 as a BLL descriptor with STK set, tMSTK set 
and L2 in E (see figure 2) . The return (BLL) sees CLL-^, 
STK-1, UWSTK=1 and does 

SP <- E; NEWL = the E field of the descriptor addressed by E 
This trick allocs both SP and L to be set correctly while 
carrying only one number in the descriptor. 
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It worfo regardless of whether Fl and Fn have fixed or stacked 
environments, hut requires F2 to have a stacked environment. 
When a labeL is passed to a routing which has a fixed 
environment, therefore, E is set to Ll and STK, REL turned 
off. If additional space is allocated on the stack after 
the call, it will not be freed when a branch is made to this 
label. It is believed that this deficiency is not very j 
serious. ' ; 

2) If CPA=1, arguments are copied whenever a BLL is 
executed. If a function has multiple results, it can turn < 
CPR on in its descriptor. This will cause CPA to be j 
turned on in the return descriptor, and the multiple results 
will be returned by the arguments - copying process when 
the return is executed. If CPA=0, the 3LLERR (2) trap 
occurs. A summary of all BLLERR traps and their parameters 
is given in the appendix. The BLLN instruction should be 
used if no arguments are being passed; in this case the 
trap will occur if CPA=1. 

The address of (actual) arguments to be copied are specified 
in the calling prograir, in a list of actual argument words 
(AAWs) following the BLL instruction. These have a one-to- 
one correspondence with a list of formal arguments words 
(FAWs) which starts at NEVTP. 
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An argument word is formatted like an instruction. The addrcs-j 

sing is interpreted exactly like the addressing for an instruc 

fcion, but the 7-bit opcode field' is treated differently, as 
follows. - 



Bits 



3-4 



Name 



STR 



Contents 



CADDR' 



5-8 



FSTR 



TYPE 



ENDF 



(actual" argument only) ' struc- 
ture 

1 = variable 

3 '= computed "scalar 

2 = array element 

= array 

(formal ' argument' only) '■ copy 
value 

1 = ccpy address of 

actual argument 

"= ccpy value of 

actual argument' 

(formal argument only) 

1 = scalar 

= array 

type - jump (actual argu- 
ment only) 

1 = integer (1 word) 

2 = long (2 words) 

3 = real (2 words) 

4 = double (4 words) 

5 = complex (4 word?) 

6 = long long (4 words) 

7 = string (4 words) 
S = label' (2 words) 
9 = pointer (1 word) 

14 = unknown 

end flag 

= not last argument word 

1 = last argument word 



Argument copying proceeds as follows: two pointers are 

initialized: 

next formal argument word (NFW) initialized to NEV.'P 
next actual argument word (NAW) initialized to P-l 
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Then FAW •«- CONTENTS (NFW) , and FAW is treated as an instruction 
word for the purpose of computing its effective address, which 
is put into FQ, , Only Dor LR addressing is permitted,- any- 
thing else will cause the BLLERR trap with class 4. 

If ENDF (FA r /,*) = NFW <- NFW -f 1 and copying continues. _ Other- 
wise, copying stops. If the instruction is BLL, the BLLERR(2} 
occurs. If it is BLLN go to step (3} . ( 

We treat NAW as we treated NFW: AAW *- CONTENTS (NAW) , R<NAW 
and its effective address is computed. The address type is 
F if TYPE = I (integer) otherwise E. BLLERR (5) will occur 
if the address type is not satisfied." 

If type (AAW) - the AAV? is a jump and its address specifies 
the next actual argument. Repeat from AAW *■ CONTENTS (NAW«-Q) , 
etc. 

If the AAW specified G-relative addressing with an address 
of it is taken to refer to the central registers. If CVAL 
/- then BLLERR (5) or if TYPE> 6 or STK = then BLLERR (4) 
will occur. 

Next the types are checked. If TYPE (FAW) f TYPE (AAW), the 
BLLERR(3) trap occurs, unless one and only one of them is 
u_nknown. FSTR and STR are checked according to the following 
table: 



FSTR 


1 



STR 



OK BLLERR (3) FTNAT BLLERR(3) 
FTNAT OK OK OK 



FTNAT means that if FTN = 0, BLLERR (3) occurs, otherwise the 
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FTNAT bit is set, which will inhibit the skipping of one word 
in step (4) > 

The idea here is that if A(I) appears as an actual argument in 
FORTRAN and the corresponding formal B is dimensioned, an 
array descriptor for B must be computed, or if A appears as an 
actual argument and the formal is a scalar, the first element 
of the array must be found. A software routine is supposed 
to do this. It needs access to the descriptor for A? the 
extra incrementing of NAW is to leave room for the address of 
the descriptor. 

Now copying takes place. If CADDR(FAW) = 1, Q is stored at FQ 
as an absolute IAW, or except in the following two cases: 

If the AAW supplied an in-mediate operand or if it is 
stored into FQ as an IK type Normal IAW, 

If Q is the result of ROP or ROX addressing or STR 
(AAW) = 3,'Q is stored as a read-only absolute (ROD) IAW. 

Otherwise (CADDR(FAW) = 0) the value must be copied. The 
details of this depend on the type: 

If TYPE = 1 and STR (AAW) ji 0, OP or the A register (in 
the .special case) is copied to FQ. 

• For TYPE < 6 and STR(AAW) ji , the number of words 
specified above is copied from Q to FQ, or from the central 
registers (A, B, C and D) to FQ if appropriate. 

If TYPE = 3 or TYPE = 4, the floating point number ad- 
dressed is examined. If it is undefined (see F loating Ppj.nt) 
the trap UFN will occur. In case the central registers are 
used, storing is performed as in the floating point store 
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(STF) instruction. (Refer to Fl oating Point.) Note that 
TDFLAG has to be set in accordance of the TYPE as the number 
of words stored by STF depends on it. 

For TYPE = 7 and STR(AAW) / 0, the four-word string 
descriptor is copied. If the BLL being executed is a system 
call (as described later), four ring checks are done, with P 
as source and each of the four word addresses as target. 
Furthermore, the word address must be non-decreasing from one 
word to the next, and » the COPS and CSIZE fields cf the first 
word are copie^ into the others. Finally, 2 is forced into 
the top two bits of each word to ensure that it is a string 
descriptor. 

For TYPE = 3 and STR(AAW) / a label is copied as 
follows: 

The first word is made absolute, i.e. Q added to the 
sign-extended SRW becomes the new LW if SREL is set, then SRKI 
is cleared. 

In the second word if bits 6-23 are 0. the word is re- 
placed by L if STK = 0. 

NEWL + the STK and UWSTK bits, if STK = 1 

The basic idea is to supply the proper context, so that the 
current local environment will be restored if the label is 
branched to. Refer to the discussion of how to unwind the 
stack to see why NEWL is used when STK = 1. 

If the label is passed by a system call, the absolute 
address in the first word is ring-checked. Before copying 
the second word CLL, STK and RT.L are cleared and bits 6-23 err 
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checked. If they are not #, 8LL£RR(6) occurs. 

For STR(AAW) = the type is ignored. An array descriptor 
is also copied like a two-word scalar, except that the second 
word W2 is replaced by an X or ROX IAW with address equal 
to the effective address which results from treating W2 as 
an IAW. This permita an array descriptor which uses relative 
addressing to be passed as a parameter, since the relative 
address is automatically converted to absolute, if BLL is a 
system call, in addition two ring checks are done with P as 
source and both the first and last words of the array as tar- 
gets. This means that if an array descriptor is passed to a 
higher ring, the higher ring can use it without fear cf ac- 
cessing storage which the calling program could not have 
accessed. 

V/hen the address or value has been copied, ENDF(AAW) is com- 
pared w,ith ENDF(KAW). If they differ, BLLERR(2) occurs. If 
both are 0, copying continues with 

HAW <- NAW + lr NFW <- NFW + 1; 
otherwise it stops. In the latter case NEWP +- NDVJ -f I 

3) If the CLL bit is on, a return descriptor is computed 
and stored at NEWL. It consists of 2 words: NAW + 1 

Kote that this is the return address 

L + 1B7 >CPR + 2B7 *STK 

i.e. , the old local environment, with STK on if it is on 
in' the descriptor, and CPA on if CPR is on in the call" 
dcscriDtor. 
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4) Sot t to &EWL> P to &EfaP> and continue execution . If 
the FTN bit is set, skip one word unless the FTNAT flag is on. 
The instruction skipped presumably will contain a subroutine 
call to take care of the special cases in FORTRAN mentioned 
earlier. 

In order to state precisely and concisely how this instruction 
works and to describe the details of ring-checking, an SPL 
program is presented in the Appendix which duplicates its 
functioning. This program uses some special functions. 
(Those not mentioned here refer to fields of functions defined 
elsewhere in this document) . 

1) The construction $X<- implies a ringcheck with R as 
source and X as target. As the access is a store, the trap 
PRO may also occur. 

2) RINGCIIECK(X) performs a ring check with R as source 
and X as target, if the check fails, trap. NACC will occur. 

3) klNG{X) produces a number depending on the ring 
which contains X, say 

1 if X is in the user ring 

2 if X is in the utility ring 

3 if X is in the monitor ring 

4} MENTERO, MEXIT() and INTERRUPT {) designate the. 
places where the actions described under "CPU Interrupt- 
ability" are taken. •,•-,. 

5) EA(X) initiates the effective address calculation 
similar' to IA(X),but the format of CONTENTS(X) is like an 
instruction (or an AAV?) rather than an IAW. 



G 



C 






p/c-n-r 

KICPU/M-4 .3 



pege 
; 47 



Programmed Operators 

If the P bit of an instruction is 1 } it is interpreted as a 
rather peculiar kind of subroutine call rather than an 
ordinary machine instruction. Execution proceeds as follows: 

the OPC field of the instruction is put into IR 
a BLL $G* [03 is executed 

Presumably word of G will contain the address of a trans- 
fer vector. If desired, it may contain an array descriptor 
which limits the number of programmed operators and supplies 
| a multiplier of 2. 

There is one additional feature: BLL will initialize NAW 
to P, rather than to P ■} 1, so it will use the instruction 
word as the first AAW. STR, TYPE and EOTF will be taken from 
the corresponding bit positions of the first FAK, 
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System Calls. 

Two versions of the OPR instruction provide protected entry 

points into" the system. The MCALL instruction works as 

follows; 

8 bits provided by the OPR are put into IR 

a ELL $SA is executed, with BA = 604000B 

when the BLL is completed, 

G <- NEWG, where NEWG = 600000B . 
The intention is that 604000B should contain an array 
descriptor with 

LB = f 

UB = total number of defined system calls 
' MULT = 2 
which points to an array of BLL descriptors for the various 
protected entry points. Note that if the system call involves 
a ring crossing, where the called system is in a higher ring 
than the caller, G is saved in NEWG [14] . G is restored from 
G'fl4] by any PLL (BLLN, POP etc.) which crosses the ring 
boundary into a lower ring. 

For calls into' the utility the UCALL version of OPR works the 
' same way, except that BA' = 403616B and NEWG = 40300'CB. Note 
; that this is the beginning of the utility ring. Variants of 
, these OPRs exist which execute' a'BLLK instead of a BLL. 

(MCALNf, UCALN) 

The PDFLAG, TDFLAG bits in the status register' are cleared 
1 by both K,CALLs and UCALLs. 
MCALLs also set the LOCKED bit of the CPU as described 
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under "CPU interruptability. " 

Trans_ 

A machine trap is a forced transfer^ control which may occur 
as a result of a variety of untoward events whlcKTtt^-wi**- 
during the execution of a program. It does not involve a 
switch to a new process. 

A trap may be fixed or rins^d^r^ndent . All fixed traps save 
the state in the. 10 words starting at S02752B (i.e., at the 
end of the monitor portion of the context block) . They then 
set G to 600P00B and do X «- nr BRU C04002B, where n is the 
trap number. They all have a one word parameter which is put 
into the A register after the state is stored. The value of 
the parameter depends on the trap. Like XCALL-s, fixed traps 
also clear PDFLAG, TDFLAG, K940 and set the LOCKED bit. 

A table 6£ all fixed traps is given in the appendix. Each 
one is described more fully in its proper place in the manual 

The ring-dependent traps differ in that they send control to 
a location determined by the ring that P is in. They store 
P and the parameter at G'[4] and G'{5] respectively and then 
clear the 940K bit in the status register and do IR *- n; 
BRU $G* [6J . 

in 940 mode, if the S bit (bit 0) of an instruction and the 
P bit (bit 2) are set, the instruction is called a SYSPOP. 
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The first 10 words of the state are stored starting at h[3] , 
then A is set to the effective address of the instruction, 
clear K940 and do X <- OPC, BRU 1* {2} • 
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CPU Interruptability 

The CPU described in this manual is expected to run as part of 

a system which includes, among other things, 

1) Several physical CPUs, which ?.re identical except for 
a number called the CPU number attached to each CPU. The 
CPUs are numbered from to n-1 where n is the number of 
CPUs. 

2) A separate processor called the gscheduler which is 
responsible for allocating CPUs to processes. The ^scheduler 
also has facilities for causing the CPU to operate in a 
single-step mode^ in which it stores the state, waits and 
then reloads it after each instruction execution, and for 
telling the CPU to stop execution at once (crash) . 

3) A p rotect mechanism, which allocs the various proces- 
sors in the system to be interlocked or synchronircd . There 

are four protect lines, any of which may be seized by any 

i 
processor. A line may be seized by only one processor at a 

time; anyone else attempting to seize the line is held up 

until the current owner lets it go. 

This section describes the behavior of the CPU with respect 
to 

1) A STROBE signal, which the ^scheduler sends when the 
CPU is to switch processes 

2) The single- step and crash signals 

3) Protect 4, which is used to interlock the CPUs, 
"keeping more than one from being in a locked state. 

4) The timer trap, which occurs when the interval timer 
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in the state becomes negative 

5} The XMON and XUTIL traps 
6) Initialization 

The relevant information is; 

a) Some information in the state 

X) The ring in which the P-counter is contained 

2} The XMON trap bit in SR 

3) The XUTIL trap bit in SR 

4) The sign bit of the interval timer, which wc call TO 

b) Some flip-flops in the microprocessor which are not part 
of the CPU state 

1) STROBE, which may be set by another microprocessor, 
normally the ^scheduler 
I 2) STEP, which may be set by some external device to 

make, the CPU operate in single-step mode. 
; 3) LOCKED, which is not accessible to external devices 
,4) ALARM, which is set when a system crash is impending 

c) The state of protect 4, which will be called CPUPRO 

d) A location in absolute core called CPUWAIT which is used 
to keep the CPU idle after the system has crashed or 
between STEPs . 
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A. Idle State 

When it is initialized (by setting the register in the 
microprocessor to 0) the CPU goes into idle state - 
IDLE: Clear map scan request; 
GOTO TDI.r. IF MOT STFOBE : 
Clear STROBE. 
PWA1T: T ■*- contents of absolute cell (6 4- CPU number) 
j[T is the process* PRT index) 
Goto PNAIT if T = 0; 

Clear absqlute cell (6 + CPU number) ; 
Clear LOCKED? Clear the map? 
Find the page with the name in (T) and (T+l) 

Take it as a context block and load the state 
from location 27643-2777B in it (called the 
SAVE area) . 
If the page is not found in CUT, send a STROBE 2 to the 
^scheduler with a message 4B7 in absolute cell 2454B + CPU 
number *4 then do like ABORT. 

Start executing instructions at the location given 
by the P-counter; 

The CPU returns to the idle state whenever it dumps the state ; 
of a process. 

B. Interruption of program execution 

At the start of every instruction, the truth of any of the 
following conditions will stop execution and cause the 
indicated action to be taken. The conditions are treated 
in the order in which they are listed. 
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2) NOT LOCKED AND STROBE: dump the state into the SAVE area, 
send a RETURN message to the jischeduler and go into idle 
state . 

3) STEP OR ALARM: dump the state into the SAVE area, clear 
STEP. Clear the wait location £"3B + CPU number} and wait 
until it becomes I2 3432l#3; then reload the state frcn 
the SAVE area and proceed , 

At every stop of indirection, every start of an instruction 
which is the target of EXU, every parameter of a BLL and in 
all other places where the CPU might be held up for more 
than a few microseconds, (MVB, MVS, CPS), conditions 1 and 2 
are tested and their indicated actions taken. 

C. Setting the bits 

XMON* and XUTIL are part of SR and may be set or cleared with 

SRS, LOADS or XSA. 

LOCKED is se£ by MCALL or fixed trap. It can also be set by 
SLOK. _ It is cleared by any BLL or LOADS which leaves the 
monitor ring (BLL, here, includes all variants: UCALL, 

MCALL, POP), 'and can also be cleared by RLOK. 

• 

TO cam be changed by loading a state from the SAVE area or 
by the OPR to set the interval timer . 

D. The X traps 

At every BLL or LOADS a check is made for transition into a 
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lower ring. If there is a transition from monitor to utility 
or user rings, the XMON trap is caused if the XMONT bit is 
set. Then if there is a transition from utility to user ring, 
thd XUTIL trap is caused if the XUTILT Lxt is set. 

E. The CPUPRO signal 

This protect is seized automatically at each point where 
LOCKED is set artd cleared at each point where LOCKED is clearc 
The programmer can set it himself with the PRO operate, but 
this is probably unwise. 
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O rdinary Instructions , 

This section contains a complete description of the behavior 
of the machine when interpreting an instruction word, with 
the following exceptions: 

instructions with P •= 1 are described under "Programmed 

Opera tors'* 
the BLL instruction is described under "Function Calls" 
the floating point instructions are treated in a" 

separate section, 
effective address computation for all instructions is 
described under "Addressing" 

Each, instruction is specified in terms of its operands, its 
effect on the state of memory of the running process, and 
any unusual traps it may cause. Traps which are caused by , 
the addressing system are the same for all instructions and 
are not considered. Traps caused by the map are the same 
except for the read-only trap. Its occurrence depends on 
whether the instruction attempts to modify memory; this 
should be obvious from the instruction description and will 
not be further mentioned. The address type is s or D for 
instructions which modify memory. 

Part of the state is a 2-bit condition- code . This code is 
set by the RESULT of most instructions as follows: 

if RESULT < 

1 if RESULT = 

2 if RESULT < 
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i The RESULT is indicated in the description of each instruction , 

[ Unless some other change in P is indicated, all instructions 

I end with' 
I P *- P-+ 1* 

The INSTD bit' ih"the status register' is set' to at the end 

i 

'' of every instruction, except' f6r LOADS.. 

I The address type of. the instruction -is indicated 'for every 

I 

1 instruction, e.g.,. 

I LDA , (F) 

1 

j 

! in the description some special' notation is used: STORE(X,i'} 

I stores X in the memory location addressed by Y. The storing 

! includes some special ' logic for (S) type instructions if a 

I 

1 field or character is specified as operand (refer to Use of 

: Addresses by Instructions),* ABS (T) is the absolute value 

i of T. ABSC4B7) >= 4B7* 
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AR 


A register 


SR 


B register 


CR 


C register (used only for double-precision floating- 


DR 


D register point and quadruple loads and stores) 


XR 


X register 


P 


Program counter 


L 


Local environment register 


G 


Global environment register 


CC 


Condition code, equivalent to RESULT: 




CC = RESULT < 




CC = 1 RESULT - 




CC = 2 RESULT > 


SR 


Status register 


OV 


= SR[22] Overflow bit 


TOV 


= SR[?1] Temporary overflow bit 


CAR] 


*Y = SR[20] Carry bit 


PDF] 


&>>G = SR[29] Permanent double-precision flag. Used 




to Set TDF1AG after ST? r STO or FCP 


TDFLAG = SRflS] Temporary double-precision flag. Kakes 




all floating-point instructions double- 


t 
1 

i 
1 


precision. 
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Data Transfer Instructions (12) 
LDA (F) Load A register 

AR «- OP; 
RESULT «s- ARr 

LDB (F) Load B register 

BR *- OPr 
RESULT <- BR? 

LDX (F) Load X register 
XR *- OP; 
CC is unchagned 

LDD (E) Load double 

AR <- CONTENTS (Q) T BR «- CONTENTS (Q-^l) r 

CR *- CONTENTS (Q i 2) & BR *- CONTENTS (Q+3) IF TDFLAG- 1 

RESULT <- AR; 

EAX (E) Effective address to X 
XR <- 0; 
CC is unchanged 

LAX (E) Load array index 

XR *- Q OR 4B6 (sets TAG to 2 for indirection) 

CC is -unchanged 

Treats bit ATRAP in an array descriptor opposite to 
all other instructions 

VSX '(F) Load negative to X 

XR +- -'OP; two-s complement negation 
CC is unchanged 
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STA (S) Store A register 
STORE (AR, Q) ; 
CC is unchanged 

STB (S) Store B register 
STORK ( BR, Q) f 

CC is unchanged 

STX (S) Store X register 
STORE (XR, Q) ? 
CC is unchanged 

STD (D) Store double 

STORE (AR, Q) ; STORE (BR, Q fl) J 

STORE (CR,Q-2)& STORE (DR, Q-» 3} & TDFLAG <- PDF1AG 

IP TDFLAG = 1? 
CC is unchanged 

XMA (S) Exchange memory and A 

TEMP <- AR; AR «- OP; STORE (TEMP, Q) ; 
RESULT *■ AR; 
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B. Integer Arithmetic Instructions (10) 
ADD (F) Add memory to A 

AR ■«- AR J- OP; (two's complement) 

CARRY <- carry from bit of adder, i.e., set if the 

sum of AR and OP taken as unsigned 24-bit integers, 

is ^ 2 ? - 4 , and cleared otherwise; 
TOV <- 1 if the add causes overflew ^ i.e., if AR and 

OP have the same sign but the sun has a different 

sign, else 0; 
0V «- OV or TOV; 
RESULT +■ AR; 

SUB (F) Subtract memory from A 

Proceed exactly like ADD except that (-0P) replaces 
OP. This is a two's complement negate, i.e., (NOT 
OP J- 1) 

ADC (F) Add memory and CARRY to A 
0V <•• 0; 

AR 4- AR + OP + CARRY; 
Then proceed exactly like ADD 

SUC (F) Subtract memory from A + CARRY 
OV <- 

AR ■*- AR + CARRY + (SOT OP) 
Then proceed exactly like ADD 

MIN (S) Memory increment 

RESULT *- AR <- OP + 1; 

STORE (RESULT,©) ; 
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MDG (S) Memory decrement 
SESULT *- AR *- OP -If 
STORE (RESULT. ,Q) 

ADM (S) Add to memory 

RESULT «- AR +- OP + AR; 
STORE (RESULT, Q) 

ADX ,(P) Add. to X 

XR * XR i OP 
, CC is unchanged 

MUL (F) Multiply memory and A 

TOV <- 0; 

TOV <- OV *■ 1 IF OP = AR = 40000000B; 

PROD <- AR * OP; as two's corr.pl eir.ent numbers, 
yielding a 47-bit two's com- 
plement result 

AR[0,23] <- PROD [0,23]; 

BR [0,22 ] «- PROD [24 \ 46]; 

BR[23] <- 0; 

RESULT *■ (AR OR (BR RSH 1)); 

The product, consisting of a sign bit and 46 •magnitude bits, 

is left- justified in the AB registers. If integers -are 
being multiplied, and ASHD -1 is required to obtain the 
integer product in B. 
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DIV (F} Divide memory into AB 

TEMP ■*- OPfTOV *• 0; 
DIVIDEND <- AB[0,46J; 
QUOTIENT *■ DIVIDEND/TEMP; 



a 4 7 bit two's-corrplement 

integer treating both ope- 
rands as fractions in the 
range -l£f<l, and obtain- 
ing a quotient with 23 
fraction bits 



TOV <- OV *- I and proceed to next 

instruction unless -l£ QUOTIENT <1 

AR *- QUOTIENT; 

TEMP *- QUOTIENT * TEMP; yielding a 47-bit product 

as for multiply 
BR <- (DIVIDEND - TEMP) ; this is the remainder 

RESULT *■ AR; 

The quoteint of the 47-bit dividend and the 24-bit divisor, 
both taken as signed two's complement fractions, is put into 
A and the remainder into B. Overflew occurs if the dividend 
is larger than the divisor, since the quotient cannot be 
represented as a fraction; in this case, the central registers 
are unaltered. 

To divide an integer in A by one in memory, do ASHD -23 first. 
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C. Test' Instructions (5)> 

ICP (F) Integer compare 

RESULT «- AR - OP; 

CP2 (F) Compare with zero 
RESULT <- OP; 

€2*12 (F) Compare A and memory with zero 
RESULT «- AR ACT OP; 

The following two instructions operate on string descriptors, 
which are pairs of indirect address words of type string. 
The intended interpretation is that the first points to the 
first character of the string, the second to the last char- 
acter, 

ISD (E) Increment string descriptor 
TEMP <- CONTENTS (Q) ; 
1 CSIZE < TEMP [2,3]; CPOS -e TEMP [4, 5]}; 
RESULT ^ TEKP - CONTENTS (Q + 1) T 
Proceed to next instruction if RESULT = 0; 
', IF CPOS 4 CSIZE <3 DO; 
CPOS < CPOS-^1; 
, ELSE DO; 

CPOS «- 0; TEMP *■ TEMP + 1- 
END IF; 

TEMP [2, 3] <- CSIZE; TEKP [4, 5] <- CPOS; 
STORE (TEMP, 0) ; 
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If the string is empty (the two lAWs are equal) the in- 
struction sets CC to 1 and exits. Otherwise it sets CC 
to or 2, and increments the first IAW by one character 
position in the string. 

DSD (E) Decrement string descriptor 
TEMP <- CONTENTS (Q-il) ;' ' 
CSIZE «- TEMP [2, 3];' CPOS «- TEMP[4 : ,S]; 
RESULT <- TEMP - CONTENTS (0) ;' 
Proceed to next instruction 'if RESULT = ${ ' 
IF CPOS > DO; ' 

CPOS +• CPOS -1;' * 
ELSE DO; • 

CPOS *- 3-CSIZE; TEMP '4- TEMP -1?' ' 
END IF';' ; 

TEMP [2, 3] V CSIZE; TEMP [4', 5] '«- CPOS; ' 
' STORE (TEMP, Q-kL) ; ' 

The- idea is the same as for ISD, but the second IA1-T is de- 
cremented' by one character position.. 

D, Logical instructions (3) 

ETR (F) "And A and memory 
AR <- AR AND OP; 
' RESULT +- AR; 

IOR (F) Or A and memory 
AR *- AR OR OP; 
RESULT' *- AR; 
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EOR (F) Exclusive or A and memory 
AR <- AR EOR OP; 
RESULT «- AR; 

Shift Instructions (6) 

All shift instructions interpret the absolute value .of 
OP MOD 64 as the number of shifts to be done. The .sign 
of OP specifics the direction; positive for left shifts, 
negative for right. 

SH7PTC <■ A£3(0P MOD ,64); 

right shift as specified' IP OP < ELSE 

left shift as specified; 

RESULT <- AR; 

ASHD (F) Arithmetic shift double (A and B registers) 
A and B taken as a single 48-bit register are 
shifted. On a right shift, the original sign bit is 
copied into 'vacated bit positions. On a left shift, 
OV <-' 1 if any of the bits shifted out differ fron the 
final sign of A. TOV is set to 1 when OV is set, 
otherwise it is set to 0. 

ASBA (F) Arithmetic shift A 

Identical to ASHD except that only AR is shifted 

LSHD (F) Logical shift double 

A and B taken as a single 48-bit register are 
shifted. Vacated bit positions are filJed with zeros. 
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LSKA (F) Logical shift A 

Identical to LSHD except that only AR is shifted 

CYD (F) Cycle double 

^ and B taken as a single 48-bit register are 
cycled. I.e., they are 'shifted, but bits which are 
shifted out one end fill the vacated positions at the 
other end 

CYA (F) Cycle A 

Identical to CYD except that only AR is cycled 

F, Branch instructions (10) 

BRU (E) Branch unconditionally 

p <- q; 

CC is unchanged 

Six instructions test the condition code 
BLT (E) Branch on less than 

P 4r Q IF CC = 07 (RESULT < 0) 

CC is unchanged 

BLS (E) Branch on less than or equal 

P +■ IF CC = OR CC = 1; (RESULT £ 0) 
CC is unchanged 

BEQ (E) Branch on equal 

P <■ Q IF CC « 1; (RESULT - 0y 
CC is unchanged" 
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BNE (E) Branch on not equal 

P <- Q IF CC / 1; (RESULT / 0) 

CC Is unchanged , , i 

BGE (E) Branch on greater than or equal 

P ■*- Q IF CC = 1 or CC * 2? (RESULT ^ 0) 
CC is unchanged 

EGT (E) Branch on greater than 
P <- Q IF CC = 2; (RESULT > 0) 
CC is unchanged 

Two branch instructions affect the X regis te: 
. BRX (E) Branch on index 
XR «- XR + 1; 

P <- Q IF XR < 0; 

CC is unchanged 

BSX (E) Branch and set X 
XR «- P 4 1; 

P +- G? 

CC is unchanged 

BLL (E) Branch and load L 
is described elsewhere 

G. Miscellaneous instructions (5) 
HI.T (F) Halt 

Always causes the TI trap 
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EXU (EJ Execute 

Initializes IR <- XR & R - q, then interprets 
CONTENTS (Q) as an instruction and executes it. 

EAC (E) Effective address computation 

This instruction computes the effective address of 
CONTENTS (Q, interpreted as an instruction word. Similar 
to EXU, IR and R are initialized to XR and Q respectively 
The results of the computation are given in registers 
as follows: 

XR[0,5) *- RESULT *- 1 & AR *- OP 

if the address is Immediate 
XR[0,5] *- RESULT <- 2 & XR[6,23] - Q 

if the address is ROD or ROX read only 
XR[0,5J <- RESULT * 3 & XR[6,23] «- & AR «- «a SK & 
BR «- SHIFT 
^ if the address refers to a field or 

or character . ' 

MASK has bits (24-SIZE),' 23 on,' the rest' 
off. SHIFT equals to 24- (FB + SI2E) 
XR[0,5] V RESULT <- & XR[d,23] <- Q 

in all other cases. 
Note that o"- whenever given - is ring " checked 
against R i„ the final phase of the address calculation , 
(refer to Addressing from Instructions}' 
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SRS (P) set or reset status bits 

The operand is used to set or reset the status 
register in the state in the following way* 
SR *• SR OR OP IP (OP AND 1) ~ 1 ELSE 
SR AND NOT OP; 

TSB (P) Test status bits 

RESULT «- Sit AND OP; 

I.e. , 1 bits In the operand select bits of SR» 
The condition cede is set depending on whether all the 
selected bits are or not. 

H. OPR (F) Operate (1) 

If the operand is negative, the instruction is a system 
call. Bits 14-15 in the absolute value of the operand 
select one of four alternatives: 

UCALL 

1 UCALN" 

2 MCALL 

3 MCALN 

Bits 16-23 In the absolute value is the address for the 
system call, (as described in a separate section) 

If the operand is positive, it is decoded to determine 
what is to be done i 
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CAB 


Copy A to B 


/ 
BR *■ AR; 








XAB 


Exchange A and B 


T •«- AR; AR ■*■ RESULT *- BR 


BR 


*- 


T; 


CBA 


Copy B to A 


AR +- RESULT «- BR; 








CBX 


Copy B to X 


XR * BR? 








XXB 


Exchange B and X 


T «- BR? BR ■*- XR; XR *- Tj 








CXB 


Copy X to B 


BR < XR? 








CAX 


Copy A to X 


XR -*■ AR} 








XXA 


Exchange X and A 


T *- AR? AR *• RESULT «- XR? 


XR 


•*- 


T? 


CXA 


Copy X to A 


RESULT *- AR *- XR; 








CNA 


Negate A 


AR <- RESULT «- -AR? 








CNX 


Negate X 


XR «- -XR; 








ZOA 


Clear A 


AR *■ RESULT <- 0; 








ZAB 


Clear AB 


AR *- BR <- ER *■ 0; 








SOB 


Clear B 


BR *- 0; 








CGA 


Copy G to A 


AR *- RESULT <- G; 








XGA 


Exchange G and A 


T <- AR; AR +- RESULT +- G? 


G ■*- 


T 




CIA 


Copy L to A 


AR <- RESULT «- L? 








XLA 


Exchange L and A 


T +- AR; AR «- RESULT «- L? 


L *- 


m 




CSA 


Copy SR to A 


AR <- RESULT «- SR? 








XSA 


Exchange SR and A 


T ■«- AR? AR «- RESULT *- SR; 


SR 


<- 


T; 


CTA 


Copy interval 
Timer to A 


A <- RESULT *- IT; 








CCA 


Copy Compute 
time clock to A 


A <- RESULT <- CTC? 








NOP 


No operation 
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KVP Move block 
The* block of AR words starting at XR is moved to the AR words 
starting at BR. The words are moved one at a time, and the 
registers arc updated after each word is moved to refect 
the nurber of words remaining to be moved. This instruction 
is interruptable. The move is done in such a way that no 
word is overwritten until it has been moved. 

MVC Move constant 
XK is stored into the AR words starting at BR. This instruc- 
tion is interruptable. 

MVS Move string 
The string of AR bytes starting at the byte specified by 
B 7 ^ ta^en as a string I AW is moved to the AR bytes starting 
at the byte specified by XR taken as a string IAW. The 
bytes are moved one at a time, and the registers are updated 
after each byte is moved to reflect the number of bytes 
remaining to be moved. If the source and target strings 
overlap, the move is done in such a way that no character 
is overwritten until it has been moved. If the strings do 
not overlap, after execution BR and XR will always point to 
the first characters after the source and target strings 
respectively. This instruction is interruptable. 

CPS Compare string 
The string of AR bytes starting at the byte specified by 

BR taken as a string IAW is compared with the AR bytes 
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starting at the byte specified by XR. RESULT is set to 
indicate whether the first string is smaller, equal to, 
or greater than the second. The registers are updated every 
time a byte is compared. This instruction is interruptable 

CLE Compute length of string 
AR and BR are taken as string IAWs. The number of bytes in 
the string starting at the byte specified by AR and ending 
at the byte specified by BR 2 -1 is put into AR. The 
CSI7.K field of BR is used to determine the byte size. 
RESULT *■ AR; 

ASP Add to string pointer 
AR is taken as a string IAW. Into XR is put a string IAW 
which points to the XRth byte beyond the one pointed to by 
AR. 

LLT Locate leading transition 
The bit number (counting from on the left) of the left- 
most bit in AG which differs from the sign bit of A is put 
into XR. If no bits differ, is put into XR. 
RESULT «- XR; 

COB Count one bits 
The number of one bits in the A and B registers is put into 
XR. 

RESULT <- XR; 

LOADS Load state 
Loads the first 10 words of tiie state (hot including the 



1 I 



compute tiirlo clock of the interval timer) from the 10 words 
addressed by X. A ring trap will occur if the new P is in a 
higher ring than the current P. This instruction does not 
clear the INSTD bit. An XMON or XUTIL trap may occur if the 
new P is in a lover ring than the current P and the XMONT 
or XUTILT bits are set in the current SR as described under 
"CPU Interr'uptability. '* 

STORS Store state 
Stores the 'first 10 words o'f the state into the 10 words 
addressed by X, but does not store P and Xr the corresponding 

locations are left unchanged. 

I.SC load string constant 
The word addressed by X is fetched and used to form a 4-word 
string constant in A, B, C and D as follows: 

TEMP <- CONTENTS (XR) ; 
: CSIZE, ^ TEMP [2,3]; CPOS «-TEMP[4,5j; 

i AR *- t BR •*- 4B7 + CSIZ3. * 4B6 +• '■ f - . ' I • 

(3 - CSIZE) *, 1B6 ^ XRr 
CR <- DR .«- 4B7, + CSIZE ■* 4B6 + 
' CPOS * 135 f XR + TEMP[6,23]r 

The following OPRs'are privileged. If P < 600000, the TI 
trap will occur. . • • ■• 

SLOK Set CPU lock 

; RLCK Reset CPU .lock- 

' ALD Absolute load, A • 




'^ x -1th the contents of *. cere location *o» ->«*■* 
address »..., m»Wd ■**»»> " ^^ " *' 

AS T absolute store A 
Stores A int. the »» location *o« -»<>1«*» aadrees is 
contained in X. 

AW Absolute address to X j 

M ade X with the absolute caress corresponds to the virtu.! 1 

.. rf • r! ,t -r the physical map entry was < 

-,, i— V ait fl IS Set. j-L V.IH- Jr*--J: ^ t 

address in X. on je j-o j 

, .it 3 is set if PKRO was on in the physical map entry,. 
empty. Bit 3 xs sex x- j 

i- ^^- 4--hf. rirtv bit was clear. * 

«. ; * -U.T*- i is set or tne cxi <-y *>->- i 

bit 2 is set if bi<- J -- s ^ j 
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««*t. .to set PSOl if «.!** i. «■ * «» °» ">~"? i 

,,,,1,, <-r. <- #- if none are, CC *• J-- 
.PROs are set successfully CC *.., ^ . . j 

These are the only possibilities. J 

t 
i 

•I 
UNPRP .Unprotect j 

.Clears PROi if ARUM is set I 

I 
ATTN Attention j 

Sends a Stro-.e si 5 rnl.to. m icroprocesscr i if A*Llo + » is sct..| 

USCL ^scheduler call ( 

This ' OPS initiates a s«itch-processes .seance . The state | 
of the. machine is derped at the SAVE area ( *>7*« . The 
Tntorval Ti.er, shifted 7 to .the right , so .that .the least 
.significant bit counts ^iUiseconds, is stored into , the M=T 
.field. (8,^:7) of thc.proocss' PRT entry. 
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The ^scheduler is called with bits 0:5 in A as an opcode, 
the CPU is put into the IDLE state. 

CMAP Sets all 2F empty flags in the map to 1 

CMAPS Clears the maps of both CPUs in the system 1 

CAT Copy A to interval timer IT +■ Aj 

CAC Copy A to compute time clock CTC *- A; 

RUN Read Unique Name 
A unique name is read from the unique name generator and 
put into AB . 

BR •*- low order bits of unique name; 

AR •«- high order bits of unique name; 
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Floatin g Point 

A. Number Representation 

A 48-bit single precision floating point datum represent: 

a rational nunber in the following way; 

1) Positive numbers 

i 11 12 47. 

X: 






M 


N 



M is the biased exponent Si 

E 4- M - 2,0130b; 

positive number X = N * 2* 

10 



,36 



,W 



where 2 35 <_ N £ 2 35 -1 and -2 10 £ E £ 2 1J5 -1 



E. g. 4-1.0 is represented as 
1 11 12 



47 



0110 1.00 



,10 



Largest number is 2' 
1 11 12 



(1 - 2~ 36 ) 



47 






11 1 


1.11 1 



Smallest positive number is (except for unformalized 
numbers, see below) 2 : 

1 11 12 47 



0100 



1.00 



2) Negative numbers , 

The sign bit (bit 0) indicates that the number is 
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negative, N is given in two's complement form: 

negative number X = (N - 2 36 ) * 2^' 35) , 1 £ H £ ? 35 
1 11 12 47 



•1.5 



E 



1 10 



Lowe at negative number is -2 2 *(1 - 2~ 36 ) 
1 11 12 47 



11 



0.00 
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Maximum negative number is -2""^"*^ 
1 11 12 



47 



■ 1 ■ 

l\$0 


1.00 



1 



11 12 



3} Zero: 



4) Un-normalized numbers 



47 



\00 


.00 



The only un-normalized numbers allowed are these: 
1 11 12 47 



X: 



00 



K 



and their negatives, i.e., Ixl ^ 2 



-710 



,l£N <£ 2 35 



Note that 



-10 
+ 2~* are both normalized and un-normalized 



5} Infinity 

1 



11 12 



47 



1 


H 1 


0.0 



The symbol - *> is treated as the single point at 
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infinity in the one-point (projective) closure of 
the reals. Operations on - =o are summarized in 
the Appendix. 

6) Undefined floating point numbers 



Data of the form 

1 11 12 



47 



9: 



M 



N 



,35 



with < M & i. N £ 2 JJ - L, 
and their negatives are not floating point numbers. 
If such a number appears as an operand for any 
floating point operation, the trap DFN will occur. 

B. Algebraic Closure Properties of Normalized Numbers 
Numbers of the form A.l, A. 2 and A. 3 are normalized 
numbers, (n.n's) 

1) ' If X is an n.n., so is -X. 

2) If X is an n.n not zero nor +2 *, so is 1.0/X. 
The smallest positive n.n. whose reciprocal is an n.n. 



is 2" 



(1 + 2- J =) . 



C. Double Precision 

The 96-bit double precision data have an additional 

fraction bits. For example a DP positive number: 
1 11 12 47 
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represents X = (N + N' * 2-48) * 2(E-35), £u> £ 248 _i 

D. Floating Point Instructions (8) and OPRs 

All floating operations have single (SP) and double (DP) 
precision variants, bit TDFLAG in SR selecting the one 
to bo used, Bit PDFLAG is used to set TDFLAG after a 
compare (FCP) or store (STF) . 

Floating operations set CC to indicate if the result is 
less or greater than or equal to 0. {STF and Flfc 
leave CC unchanged) 

FLD (E) F3 eating load 
An SP or DP floating point number starting at Q is 
copied into the floating point accumulator. (The A, B, 
C, D and E central registers) 

STF (D) Floating store 

SP: The floating point accumulator is rounded 
at bit 35 of the fraction and copied to (Q) and (Q'l) . 

DP: Four words are copied from FA to the 
locations starting at Q. A double floating store causes 
no rounding if the FDP bit in SR is set. Otherwise it 
rounds at bit 71 of the fraction and zeroes the last 
12 bits. The FDP bit thus determines whether DP numbers 
are stored with 72 or 84 bits of fraction. Overflow 
may occur because of the rounding. In all cases 
TDFLAG <- PDFLAG after the store. 
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(i.e., r[84], since when we say 'bit 83 of the fraction' 
we don't count the sign bit) in accordance with the 
rounding mode in force, is assigned to the floating point 
accumulator. See the discussion oc rounding below for 
details. Both overflow and underflow may occur. 

FSB (E) Floating subtract 
Identical to addition except that the negative of the 
second operand is taken first. This cannot cause any 
abnormal conditions. 

FMP (E) Floating multiply 

SP: The accumulator is rounded to single 
precision, then the two 36-bit fractions are multiplied 
to yeild a 72-bit result. The exponent which coes with 
the result is the sum of the exponents of the operands 
plus one, to correct for the placement of the binary 
point in the product. The 72-bit fraction is shifted 
left if reauired for normalization. No rounding is 
required since the accumulator can hold this entire 
product. Overflow or underflow may occur. 

DP: The two 84-bit fractions and the two signs 
are multiplied to yield an 86-bit result (sign plus 85 
magnitude bits) and an 87th bit which is the union of 
the 82 least significant bits of the full 168-bit product 
The resulting 87-bit number and the exponent obtained 
by the procedure described for single precision are 
normalized and rounded like the result of an add. 
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FAD (E) Floating add 

SP: The operand is extended with 48 zeros on 
the right. A DP is then done. 

tiZt Let the operands be a * 2^ c * 2"*. Hie 

two exponents are compared. Suppose b ]>_ d 4 Then c is 
shifted right by b - d. A 87 bit register is provided 
to hold c^ which is loaded (sign + 84-bR fraction) 
into the 85 most significant bits. The two least 
significant bits are cleared. The 86 most significant, 
bits participate in the tight shift in the usual way. 
The least significant bit is 'sticky' i if a 1 is Over 
shifted into it. it regains 1 from then ori . 

After c has been shifted, it is added to a in an 85-bit 
adder j yielding a result t of 87 bits* Bits 85:86 of 
c do not participate in addition. 

Now, if an overflew has occurred {s.[0] = c[0] ^ r[#]}> 
r is shifted right by 1. r[36] is treated as a sticky 
bit in this shift just as it was in the shift of c. b 
is incremented by 1 if this shift occurs and r[0] ■*■ NOT 
r [0] ; 

The result is normalized by left shifting until either: 

1) the sign bit differs from the next bit or 

2) the fraction is 1100 ... 

The exponent b is decremented by 1 for each left shift. 
Lastly the result, rounded at bit 83 of the fraction 



' *d*mt i M iSiam &i i M »i M l Mlltf 



>^^*&*£*s§*** B ^sA a aUit«*rf^*3&**«ia* rf j 



' !, wv* 



I p/c-n.» 

j MICPU/M-4 ,3 



|f 303 
1 Q<1 



XR is assigned a 24-bit integer which is the floor of 
the floating operand. If the floor is > 2^3 -1 in 
magnitude, the trap FLXG occurs. The result does not 
depend on SP or DP mode , 

FNA (OFRJ Floating negative 
The number in the floating point accumulator is replaced 
by its negative t 

FIX (OPR) 
Similar to FLX, but the operand is taken from the 
floating poirit accumulator and the result is put into 
RESULT and AR. 

FLOAT (OPR) 
A FLOAT operation produces a (normalized) floating point 
number in the floating point accumulator which when FlXcd 
will restore the integer operand in AR. (unless it is 
437) . Nothing can go wrong with FLOAT. 

Round ing 

There is a three-bit field (TRMOD) in SR which specifies 
how rounding is to be done (the field PRMOD is used to 
set TRMOD after every FAD, FSB, FMP, FDV, STF or FCP) . 
The descriptions of instructions above state explicitly 
each point where rounding is done. The phrase 'round at 
bit n of the fraction' means that bit n of the fraction 
(numbering the magnitude bits from and not counting the 
sign) is the least significant bit retained. 
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FDV (E5 Floating divide 
SP: The 36-bit divisor fraction is divided^ into 
38 bits' of the accumulator fraction to produce a 37-bit 
quotient. To this is appended a 33th bit which is sot 
if the division is not exact or if the other 46 bits of 
the accumulator fraction are non-zero. The resulting 
33-bit number is put into the fraction of the accumulator 
and filled out with 46 zeros on the right. The exponent 
of the result is computed by subtracting the divisor 
exponent from the dividend exponent. 

DP: The 84-bit divisor fraction is divided into 
the 84-bit accumulator fraction to produce a 85-bit 
quotient. The exponent is computed as for SP and the 
result is rounded in the usual way. 

Overflow or underflow may occur. Division by produces 
its own trap. (DIZ) 

If the divisor is an un-normalized number it is 
normalized prior to division. It may or "may not cause 
overflow as explained below. 

FCP (E) Floating compare 
Identical to floating subtract, but the result is not 
assigned to the floating accumulator. CC will be set 
an usual to indicate the sign of the result. 
TDFLAG *• PDFLAG. 

FLX (E) Fix and load X 
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The rounding modes are: 



TRMOD 



Name 






S 


2 


F 


3 


C 


A 


P 


5 


M 



Rounding 
nearest number 
floor (toward 0) 
ceiling (away from 0) 
away from - « 
toward - « 

Rounding involves three bits. The first is the least 
significant bit to be retained and is called Q. The 
one following Q is called R. The third is the union of 
all the bits following R (sometimes only 1, none for 
double divide) and is called T. 

The rounding rules are. as follows (call the sign S) : 
N: +1 (add 1 to least significant retained bit) 

if R = 1 unless Q = and T = 
P; +1 if S = 1 and R or T = 1 
C: +1 if S = and R or T = 1 
P: 41 if R or T = 1 
M: no action 

F. Overflow and Underflow 

Overflow or underflow occurs if at the end of a floating 
point instruction, the exponent is outside the permitted 
range . 

Overflow always causes a trap (FLO) . It leaves a correct 
result except for the exponent, which must be read as a 



n 
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12-bit two's complement number with sign bit the 
complement of the high-order bit preserved. 

Underflow action depends on the SUP bit in SR, If it 
is set, no trap occurs and a suitable unnormalized 
number or zero results . Otherwise, trap FLU occurs and 
the result is correct {and normalized) wiLh the same 
rule for the exponent as was stated for overflow. 
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code 


1 
2 
3 
4 
5 
6 
7 



DEFINITION OF INSTRUCTION CODES 



mnemonic 

HLT 
IDA 
LDB 

LDX 
LDD 

EAX 

lnx 

XMA 



a. type 

F 
F* 

F* 

F 

E* 

E 

E 

S* 



10 


ETR 


F* 


11 


I OR 


F* 


12 


EOR 


P* 


13 


STD 


D 


14 


STF 


D 


15 


STA 


S 


16 


STD 


S 


17 


STX 


s 


20 


ADD 


F* 


21 


SUB 


F* 


22 


ADC 


F* 


23 


sue 


p* 


24 


ADM 


S* 


25 


ADX 


F 


26 


' KIN 


S* 


27 


MDC 


S* 


30 


MUL 


F* 


31 


DIV 


F* 


32 


ICP 


F* 


33 


CPZ 


F* 


34 


CMZ 


F* 


35 


ISD 


E* 


36 


DSD 


E* 


37 


EXU 


E? 



ode 


mnemonj 


40 


ASHD 


41 


AS HA 


42 


LSHD 


43 


LSHA 


44 


CYD 


45 


CYA 


46 


TSB 


47 


LAX 


50 


ERU 


51 


BLT 


52 


BEQ 


53 


BLE 


54 


BGT 


55 


BNS 


56 


BGE 


57 


BLI, 


60 


BLLN 


61 


BRX 


62 


BSX 


63 


SRS 


64 


EAC 


65 




66 




67 




70 


FLX 


71 


FLD 


72 


FCP 


73 


FAD 


74 


FSB 


75 


FMP 


76 


FDV 


77 


OPR 



* indicates that CC is set by the instruction 



a. type 

P* 

F* 

Jr** 

F* 

F* 
p* 

F* 
E 

E 
E 
E 
E 

E 



E 
E 

E 
F 
v* 



E 

E* 
E* 
E* 
E* 
E* 
E* 
F? 



n 



n 



■ ., „ r,?ft «lMrrii^«y«l^lftii»^>rHfct-^»<V,^,ti^^«^^ 






JO 



p/e-n.r 



MICPU/M-4.3 



DEFINITION OF OPR ADDRESSES 



ddress 


mnemonic 





CAB 


1 


XAB 


2 


CBA 


3 


CBX 


4 


XXB 


5 


CXB 


6 


CAX 


7 


XXA 


10 


CXA 


11 


CNA 


12 


CNX 


13 


ZOA 


14 


ZAB 


15 


20B 


16 


CGA 


17 


XGA 


20 


CIA 


21 


XIA 


22 


CSA 


23 


XSA 


24 


CTA 


25 


CCA 


26 


NOP 


27 


MVD 


30 


MVC 


31 


MVS 


32 


CPS 


33 


CLS 


34 


ASP 


35 


LLT 


36 


COB 


37 





tddress 


tonemon i c 


40 




41 


LOADS 


42 


STORS 


43 


LSC 


44 


FIX 


45 


FLOAT 


46 


FNA 


47 




** 


* 


51 




52 




53 




54 




55 


SLOK 


56 


RLOK 


57 


ALD 


60 


AST 


61 


AAX 


62 


PRO 


63 




64 


UN PRO 


65 


ATTN 


66 


USCL 


67 


CMAP 


70 


CMAPS 


71 


CAT 


72 


CAC 


73 


RUN 


74 




75 




76 




77 





* indicates that CC is set by the OPR 
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SIGN (W[i,j]) means W[i, j] interpreted as a twos-com- 
plemcut number of (j-iil) bits. 

CONT(W) or 

CONTESTS (W) moans the contents of. the memory location 

whose address is tlie value of W. 

A ring check is performed with R 
as a source and W as target. 

XX(W), where XX is the abbreviation for an addressing 
mode, means the value of Q if that mode is applied to W. 

IA (XI mean? to ini'-iate indirect address word cal- 
culation on IAW ■*- CONTENTS (X) & R <- X. The calculation 
depends on IAT *- IAW[£,XJ 

All instructions start with IR <- XR & R <- Pr 



Summary of Indirect Addressing 



Name 
Normal 



IAT 



Notation 



Like instruction, 
with LAW for OP 



Field 



String 



FIELD D:FB, 
FB l SIZE 



STRING WAtCPOS, 
CSIZE 



Add ress C omputation 

TAG = LAW [2,4], then like 
instruction, except for 
TAG = D, I,X use IAW [6,23] 
for W and den ' t add G . Trap 
IATRP (R) if W[5]=I. Add 
IR to Q (for LR or SR mode) 
or to LR cr SR (for ILR, ISR) 
if IAW [6] =3, and use LAW 
[7,23] for W. 

For TAC-PD, IPD, calculate 
address as"D,X '(G is net 
added) . This is the read 
only (ROD,ROX) addressing 
mode . 

Q <- IR + (DISPL <- SIGN (IAW 
[13,23])? U-K20NT(Q); 
OP <- U[FD <- LAV? [8, 12], FB + 
(SIZE <- TAW [3,7])]; 
IF(SK *- IAW[2,2]}=0 ELSE 
SIGN(U[FB, FS'SIZE]) ; 

CSIZE <- IAW [2,31 gives byte 
size: 6,8,12 or 24. Then 
IAW selects byte COPS < IAW 

[4,5] from word WA «- IAW 

[6,23]. 
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Summary of Instruction Addressing 



Abbr , 

D 

I 

X 

PD 

1PD 

BX 



ffamo 

Direct 

Indirect 

Indexed 

Pointer dis- 
placement 



Indirect-pointer OPC $PTR[D] 
displacement 



Notation Address Computati on 

OPC G'[W] Q <• W4G; OP «- CONT(Q) 

OPC $G* [W] IA(WiG); 

OPC X'[W] Q «-W-HRj OP *-CONT(Q); 

OPC PRT[D] Q *- SHORTPTR(PTR +■ W 

[16,23] .IRj-'-tD ■*- SIGN 
(W[10,l5]))r OP «- 
CONT(Q) ; 

IA(PD(W) ) ; 



Base-index 





BXD 


Base-index- 
displaceraent 




IM 


Immediate 




IMX 


Irrjnediate 
indexed 




LR 


Irrelative 




ILR 


Indirect 
L-relativo 



OPC B[X] T <~ SHORTACR(B *- W[16, 

23]); 

IR < SIIORTPTR(X «- V 

[1?,15],IR); 
XA(T) ; 

OPC {$X') tX+D] T <- IR? 

IR <- SHORTPTR(V?[16,23), 

0VSIGN(W[1O,15]) ; 
IA(T) r 

OP +■ SIGN(W[13,23l) j 



OP <- IR + SIGN{V7[13, 
23])? 

Q *- IA(D «- W[l3.23])f 
OP <- CONT(Q) ; 

IA(LR(W))« 



SR Source-relative 



OPC 


I 




OPC 


X' 


4-1 


OPC 


L' 


ID] 


OPC 


$1 


/tD] 


OPC 


R' 


[D] 



Q «- R+(D <- SIGN(W[12, 
23])) ; OP <• CONT{Q); 

IA(PR(V7)) r 



ISR Indirect source OPC $R'[D] 
relative 

Kotcs: W[i, j] weans bits i to j of the 24-bit quantity W. Bit 
is the leftmost bit. 

SHORTADR(W[i, j] ) means IR IF Wfi,j]=£f ELSE 

GtVJ[i+l, j] IF W[i]«=# ELSE 

WJ[iU ; j] 

SHORTPTR(W[i, j]Y) means Y IF W[i, j]=0 ELSE 

CONTEN , TS(G!V. , [i!l,j] FI W(i]=0 
ELSE Ll-W[i+l,j]) 



Q 



a 
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Array 



ARRAY LB:UB*KULT? 
IAW 



Two words. Trap ABE (P.) IF 
IRCLB <- Wl [8, 8] OR IR > VS* 

(V;l[7,23] IP (LEB <•- Wl[4,4] 
-0) ELSE Willi, 23]); 
IATRP(R) IP (Wl[3,3]=l) jt 

(INSTRUCTION = LAX); 

IR <- (IR-LR) *(MULT *- (Wl [5, 

6] IF LEB-0 ELSE Wl[5,lf] 

+l)r 



r 



^ 
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FIXED TRAPS 



Number 
1 



11 

12 



Name 
MACC 

PRO 

PNIM 

PNIC 
TO 

PI 

TI 
XMON 

XUTIL 

ILIK 

MAB 
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Caused By 



Memory access error <- at- 
tempted access to monitor 
from below M or utility 
from below D 

attempted write of RO page 

attempted reference to page 
not in map 

attempted reference to page 
not in core 



timer overflow 
monitor mode 



not in 



privileged instruction 

trapped instruction 

on exit from monitor via 
any DLL or LOADS if XKONT 
is set in the state 

on exit from utility via 
any BLL or LOADS if XUTILT 
is set in the state 

indirect limit exceeded 
map abort 



Parameter 

Q+ 
IRING(R)-l)* 
1B6 



address of 
LAW 



n 



Q 
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RING-DEPENDENT TRAPS 



Caused Dy 



Number Name 

1 ABE array bound exceeded 

2 FLO floating overflow 

3 FLU floating underflow 

4 RO read only trap 

5 IATRP indirect address trap bit 

6 UFN undefined floating number 

7 FLXO overflew on FIX or FLX 

instruction 

q DIZ floating divide by zero 

9 STKOV stack overflow 

10 BLL ERR function call error 

described in separate table 



Parameter 

address of 
IAW 



address of 
ROD or ROX IAW 

address of 
IAW 



CLASS 



K AVI - 1 - 
IBS 



Hi? 



f- £ 
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RJNS DEPENDENT TRAP 10: BLL ERR 



Class 
1 
2 
3 
4 
5 
6 



address typo error in A 
wrong number of arguments 
argument type mismatch 

inadmissible argument 

address type error 

array, label or string 
descriptor format error 



Parameter 

1B5 
2B6 + NAW 
3B6 + NAW 

4B5 + HAW 
5B6 J- NAW 
6B6 + NAW 
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SUMMARY OF IMPORTAti'i 1 CUIUS AUDKiJ^J-.S 

Start |f^ the user ring 

G'[0] FOP entry IAW 

G*[l] 2nd word of POP entry IAW 

G't2' SP - Stack Pointer 

G'[3] SL - Stack Limit 

G'[4] Ring dependent trap - P is stored here 

G't5] Ring dependent trap - parameter is stored here 

G'[6] Ring dependent trap service entry IAW 

G'[7] (nay be used as 2nd word of IAW) 

G'{31] Last word which can be used as an index in BX 

G'[127] Last word which can be used as a pointer in PD 

or IPB or as a base in BX 

G't37777B] Last word which can be accessed by D, I addressing 

L' [0] '• 1st word of the return descriptor - P 

L'tl] 2nd word of the return descriptor - L, STK, CPA 

L*[2] SYSPOP transfer address 

L*[31] Similar to G'[3<7j 

L'[127] Similar to G'[127] 

L* 12047] Last word which can be addressed by L, LI 

addressing 

400'gf#0B Start of monitor ring 
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403J.WB Start of utility ring, G for utility 

40'30I4B G may be stored here 

40301611 UCALL entry TAW 

600000B Monitor ring starts again, G for monitor, 

context block 

6ffgfCfl43 G may be stored here 

6tf?7S2B State is stored here if a fixed trap occurs 

6#2764B Start of the SAVE area 

6040003 MCALL entry IAW 

S0V002B Fixed trap entry 

77 7777B Maximum virtual address 
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* SPL PROGRAM TO DEFINE BLL 

BLLl N-OI SPEC-0J MCAL-0J NEVG-GJ GOTO BLL1 J 
8LLN: NMJ SPEC-CJ MCAL-PI NEVG-GJ GOTO BLL1 J 

* OPR VI TH NEGATIVE OPERAND: 
OPRJ OP- -OPJ 

N-0P £ B1T15J S°EC~0J 

MCAL-OP S BITM+H 

<NE'-.'G-O30C3B 4 R-403fil4S> IF KCAL=1 ELSE 

CNEVG-6OCGC0B £ R~ 63 43CPSQ > J 

IR-OP S BIT! 6THRU23* 1ACR); GOTO ELL H 
* 
POPl POP'.-,'-CONTENTSCP>l IR-P3PV S FQPCJ N-0 

SPEC-H HCAL-C« N'CWG-GJ 

1ACOI TIC) IF in,-1CDlATE=i; GOTO BLL U 
+ 
BLL 1 t N EVP V- CON I E N TS ( G ) J 

BLLERRU) IF KEVPV $ BIT5J 

NEVP-CNE'.'PV S FLV IF NEVPV $ BIT4--0 
ELSE + NEV. J V $ FSR\'>J 

BRD-CONTENTSCC+l > FTNATF-GJ 

CLL-BRD S BIT3J STK-BRO S BIT!) 

CPA-DRD $ BIT2J 

CPR-BRD S BIT3 3F CLL=1 ELSE UVSTK-BRD $ BIT3J 

REL-BRD S BIT At FTN-BP.O $ BIT5J 

NEVL-E-BRD 5 =Xj 

IF RING<NEVPXRING(P) DOJ 
NEVG-GLM3; RCT-U 

END1FJ 

* i 

* OBTAIN NEW LOCAL ENVIRONMENT 

■k 

IF STK=i DOJ 

IF CLL=0 DOJ 

IF UVSTK=0; SP-Li 

ELSE DOJ SP-EJ NEVL-E.FE; 

F.NDIFJ 
ELSE DO) 

sp-n - e'-.'gtb)*e) stkovo if sp>-nevgc 33 j 
ne'.-;l-nlvgc23j 

ENDIFJ 
ELSE DOJ 

NEVL-L IF NEVL=0J 
ENDIFJ 



RINGCKECKCNCVP>> 

COPY ARGUMENTS 

BLLERRC2) IF N=CPAJ 

NAV-P+1 I 

IF CPA00 do; 

FOR NFV-NEVP BY 1 DOJ 



n 
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L0t 



if"** 



L! s 



I 



R-NE'-JPJ FP*-C0N7ENTStNFV/>J 
FTYPE«-FP £ TYPE) 
IF SfKC-l DO I 

SPLC-0J AP-POPV; NAV-NAV-iJ 

ATYPE-FTYPE; ASTR-FP $ FSTRi AENDF-FP $ ENDFl 
ELSE DO; 

R-P; AP-CONTENTS<NAW)J 
ATYPE-AP S TYPE; ASTR-AP $ STR; 
AENDF-AP S ENDFJ 
ENDIFJ 
■ IF ATYPE=0 D0J 
JUMP IN ACTUAL ARGUMENT LIST 

R-Pi IR-XRJ EA<NAV)J 
BLLERR(S) IF IMMEDIATE! 
NAV-Qi 
GOTO L0J 
ELSE Dl»i 

BLLERRC2 3 IF AENDF#FP S ENDFi 
IF ATYPE*'FTYPE DOJ 
TYPES DISAGREE- ERROR UNLESS ONE IS JOKER* JOKER IS CHECKED 
FOR BELOW UNLESS CADDR=I OR FSTR: ARRAY* IN WHICH CASE IT IS 
NOT CHECKED. 

!*• ATYPE/'14 DO* 

BLLERRC3) IF FTYPE#14> 
FTYPE-ATYPEJ 
ENDIF; 

endif; 

NAVP-NAV; 

IF ASTR=0 OR ASTR=2 DO* 
NAW-NAV+l IF ASTR=2J 

IF FP $ FS7R=0 AND ASTR=2 OR FP S FSTR=I 
AND ASTR-0 DOJ 

BLLERR(3> IF FTN=0J FTNATF-tJ 
TEMP-NAV+18 6J 
GOTO Li; 

endif; ' 

ELSE DO; . , , 

BLLERRC3) IF FP S FSTR=0J 
. , , ENDIF; 
CHECK FOR ACTUAL ARC IN ACCUMULATOR 

IF <AP AND 70037 ?V7B)^a' DOJ 

R-PJ IR-XR; EAINAVP/J ARGADR-QJ 
IF FP S CADDR = 'l DO) 

IF r'« v .EDIATE=I do; , , . . . 
CONSTRUCT IK-.IZDIATE, JAV ,, 

TEMP-OP AND 37773, OR 1 &24B4t , 
ELSE DOJ 

R I N GCHECK < ARGADR > J TEMP-AR.GADR J 
MAKE THE IAV READ-ONLY IF NECESSARY 

TEMP-TEHP+1B7 IF READONLY*! OR ASTR=3» 

endif; 

FIX UP SO THE COPY VALUE CODE WILL COPY THE ADDRESS IN TEMP 
FTYPE-iJ FP S FSTR-U 
ELSE DO; 



If 
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IF 1MKED1ATE=1 DO; 

BLLEKRC5) IF FTYPE#t OR FP t FSTR-CJ 
END! Fi 

1 LHP*- tOP IF FIYPE»1 ELSE CON I LN 1 •>< AKGaDK) > I 
ENDIFJ 
OLDR-R? 
CPYADR-UFP AND 3777B)+NEVL IF FP<C ELSE 

<FP AND 37/7 7U)+NEVG); 
GOTO ARRAY IF FP $ FSTR=6J 
COUNT- (1 IF FTYPE=1 CR FTYPE=9 ELSE 
2 IF FTYPE=2 OR FTYP£=3 ELSE 
A IF FTYPE=4 OR FTYPE»5 OR FTYPE *6 
ELSE GOTO STRING IF FTYPE=7 
ELSE GOTO LABEL IF FTYPE=8 
ELSE BLL£RR<4) >J 
UFN'TRAPO IF(FTYPE=3 OR FTYPE=4) 
AN D UN DE F I N E D ( TEMP ) J 
L2t R-NCVP« SCPYADR-TEMPI COUNT-COUNT- I ; 

IF COUNT "'P DO; 
r-oldr; Q-Q+1J 
CPYADR-CPYADR+1 J 
TEHP-CONTENTS(Q); GOTO L2J 
ENDIF; 
ELSE DOJ 

BLLERRC5) IF FP S CADDR=! OR FP S FSTR=0J 
CPYADR-CCFP AND 3777B)+NEWL IF"FP<0 ELSE 

IFP AND 37777B)+NEVG); 
IF TYPE* 3 OR TYPE* A DOJ 

STF(CPYADR); 
ELSE DO; 
, COUNT-U IF FTYPE=J OR FTYP£=9 ELSE 

2 IF FTYPE=2 ELSE 
A IF FTYPE=5 OR FTYPE=6 ELSE 
BLLERRC4)); 

r-nevp; 
store(cpyadr» a)j 

IF COUNT* 1 DOJ 

STORE(CPYADR+l* B)J 
IF C0UNT#2 DOJ 

STOREtCPYADR+2* C5i 

st0re<cpyadr+3» d); 
endif; 
endif; 

ENDIFJ 

fndif; 

NAV-NAV+! J 
L3J ENDIF; 

INTERRUPT'CHECKO; 
GOTO LA IF FP $ ENDF=rr 
END FOR J 
L4: NEWP-NF '.•/•«■ 1* 

ENDIF; 
* 
*• COMPUTE RETURN DESCRIPTOR 
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IF CLL=! DOl 
R-NEVP* 
NEVLC03-NAWI 

NEVLC 1 j*-l*2B7"*stk*ib7*cpri 

NEVGU4B1-G IF MCAL>0 AND RING( NEVP > >Ri NG<P > J 
ENDIFI 

IF STK=t D01 
IF CLL=1 DO 

R»NE'..'PI NES r GC21-SPI 
ELSE DO) 

R*P; GC2J-SPI 
ENDIFJ 
ENDIFI 

IF MCAL=2 DO! 
KENTERS PR0TECTC4II 

SET'LOCK< )J 
ENDIFI 

SR S TOFLAG-SR $ PDFLAG-0 IF MCAL>0l 
L-NEVLI G-HEVGJ CLDP-PI P-NEVPJ 
IF REl = l DO! 

IF 0LDP>=6B5 DOl 

MEXIT: UNPR0TECTC4JJ 

RESET'LOCKOI 

XMON'TRAPO IF SR S XMONTl 
ELSE DO 

XUTIL'TRAPO IF SR S XUT1LTI 
ENDIFI 
END IFJ 

P-P+l IF FTN=1 AMD FTNATF=0l 
* 
* EXIT FROM BLL 

GOTO NEXT'INSTRUCTIONJ 
* 
STRING? COUNT-4) GOTO L2 IF MCAL=Bl 

FORM-TEMP AND 1 436 OR 4371 OLDT-31 
FOR 1-0 BY 1 DO! 

R-P) R1NGCHECKCTEMP)! 

BLL ERR < 63 IF OLDT $ VA>T£MP $ «A OR 

OLDT $ VA=TEMP $ '-.'A AND 
OLDT $ CPOS>TEMP $ CPOSI 
R-NEVPI $ (CPYADR+D-TEfiP AND NOT 74B6 OR FORMl 
GOTO L3 IF I=3S R-OLDRI QLDT-TCMPI 
TEMP-CON TENTS ( ARGADR+ I + 1 >l 
ENDFORI 
* 

LABEL: Q-CTEMP i FL'<J IF TEMP S BIT4=0 
.ELSE ARGADR + TEMP $ FSR'.s')! 
RINGCHECK(G) IF MCAL>Ol 
R-NEV.'PI 

STORE<CPYADR» <? AND NOT 75B6 OR TEMP AND 75B6>J 
R-OLO:!> BRD-C0NTEN1S<ARGADR*1 )l 
IF B.'JD i FE=0 AND BRD S FSTK=0 DOl 
PRD-BUD AND NOT 107 IF MC^L>3J 
BRD-BRD OR (L IF STK = ELSE NEVL+28 1* ABO ) 
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ELSE DOl 

BLLERRC6) IF MCAL>Ol 

ENDIFI 

R-NEVPJ 

ST0RE<C0PYADRM*8RD>I GOTO L2J 
* 
ARRAYS R-NZVPI SCPYADR- TEMPI 

BLLERR<6) IF TEMP $ IAT#3I 

IF MCAL>0 DOl 

IR~<TEM? S U3I IF TEMP S LEB=0 ELSE TEMP S UB2 3J 
IA<ARGADR+I>I RINGCKECK <0 > I 

ENDIFI 

IR-CI R-ARGADR) I A C ARCADR+ 1 ) J 

BLLERRC6) IF IMMEDIATE"!! 

RINGCHECK(O) IF MCAL>0> 

R-NE'WPI 

$<CPYADR+1 )«-<0 + C^36 IF REACONLY = ELSE 1286>>J 

GOTO L3I 



I 



